熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

獲取url包括參數

2013-11-13 10:43:01  來源: .NET編程 

  獲取url包括參數
  函數名GetUrl
  作  用獲取url包括參數
  返回值獲取url包括參數
  ****************************************************
  Public Function GetUrl()  
   Dim strTemp    
   strTemp=RequestServerVariables("Script_Name")     
   If  Trim(RequestQueryString)<> "" Then
    strTemp=strTemp&"?"
    For Each M_item In RequestQueryString
  strTemp=strTemp&M_item&"="&ServerUrlEncode(Trim(RequestQueryString(""&M_item&"")))
    next
   end if
   GetUrl=strTemp  
  End Function
 使用方法
 call GetUrl()


From:http://tw.wingwit.com/Article/program/net/201311/14359.html
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.