register

来自「WAPmo手机网站管理平台是一款创建与管理维护WAP网站的的软件产品」· 代码 · 共 16 行

Private Sub Class_Initialize()
End Sub

Private Sub Class_Terminate()
End Sub

Public Sub main()
    Dim strReferer
    strReferer = MyIO.QueryString("Referer")
    If strReferer <> "" Then
        Response.Redirect "bbs/register.asp?refer=" & MyIO.URLEncode(strReferer)
    Else
        Response.Redirect "bbs/register.asp"
    End If
End Sub