% SiteInfo() dim mykey,ScriptTitle ScriptTitle=left(SiteTitle,len(SiteTitle)-5) if Request.QueryString("action")="chk" then mykey=trim(Request.Form("key")) else mykey=request.QueryString("key") end if if mykey="lovezcj" then call viewmusic() else call viewform() end if sub viewform() %>