在第三方页面传递参数这个思路倒是的确可以省下一些代码,至少我以前是从没这样子传过。
<%
''Pass form objects submitted by a form G
'' ET
If Request.QueryString.Count>0 Then
QStr="?"
For Each x In Request.QueryString
QStr = QStr & x & "=" ''Write Name of Parameter
QStr = QStr & Server.URLEncode(request.QueryString(x)) & "&" ''Write value of parameter
Next
QStrSz = len(QStr)-1
QStr = LEFT(QStr,QStrSz)
else
QStr=""
End If
Response.Redir...[ 查看全文 ]