<OBJECT classid=clsid:5EEEA87D-160E-4A2D-8427-B6C377FEDA4D id=t>
</OBJECT> <script language = vbscript>
Function window()
<%If szSession <> "" Then%>
Set objProp = t.GetObject("Property")
objProp.value("Username") = <%=szName%>
objProp.value("LoginSession") = <%=szSession%>
objProp.value("ServerAddress") = "127.0.0.1" 'RTX Server IP地址
objProp.value("ServerPort") = 8000 t.Invoke 2, objProp '2表示通过SessionKey登录
<%EndIf%>
End Function
</script>
</OBJECT> <script language = vbscript>
Function window()
<%If szSession <> "" Then%>
Set objProp = t.GetObject("Property")
objProp.value("Username") = <%=szName%>
objProp.value("LoginSession") = <%=szSession%>
objProp.value("ServerAddress") = "127.0.0.1" 'RTX Server IP地址
objProp.value("ServerPort") = 8000 t.Invoke 2, objProp '2表示通过SessionKey登录
<%EndIf%>
End Function
</script>
把這里的Set去掉,每行最后加上";"
Function window()
{
<%If szSession <> "" Then%>
objProp = t.GetObject("Property");
objProp.value("Username") = <%=szName%>;
objProp.value("LoginSession") = <%=szSession%>;
objProp.value("ServerAddress") = "127.0.0.1"; //RTX Server IP地址
objProp.value("ServerPort") = 8000; t.Invoke(2, objProp); //2表示通过SessionKey登录
<%EndIf%>
}
</script>
function window()
{
if("<%=szSession%>" != "")
{
var objProp = t.GetObject("Property");
objProp["Username"].value= "<%=szName%>";
objProp["LoginSession"].value= "<%=szSession%>";
objProp["ServerAddress"].value= "127.0.0.1";// 'RTX Server IP地址
objProp["ServerPort"].value= 8000; t.Invoke( 2, objProp);// '2表示通过SessionKey登录
}
}
</script>
<script language = vbscript>
function window()
{
if("<%=szSession%>" != "")
{
var objProp = t.GetObject("Property");
objProp["Username"].value= "<%=szName%>";
objProp["LoginSession"].value= "<%=szSession%>";
objProp["ServerAddress"].value= "127.0.0.1";// 'RTX Server IP地址
objProp["ServerPort"].value= 8000; t.Invoke( 2, objProp);// '2表示通过SessionKey登录
}
}
</script>
==================================================
也不对啊,都变成字符串了
看了程序才知道具体怎么写,我现在只能是看表面翻译