How to change ASP variable in VBScript
Hi Friends,
I created an asp file with some variables.
I declare status variable and assigned a default value.
Dim STO
STO ="Online"
I want to change STO in VA script logevent procedure.
I am trying to use set as <% set STO = "new value" %>
It does not work.
Every Experts, How to change ASP variable in VBScript?
Thanks,
New web person
**********source code***********
<%@ Language=VBScript %>
<html>
<head>
<title>TEST
</title>
</head>
<body bgcolor="white" >
<%
Dim GUIPar
Dim GUIPar2
Dim STO
STO ="Online"
GUIPar = Request.QueryString("para1")
response.write "<center><b>Status :</b>"&STO&"  "&now()&"<br></center>"
GUIPar ="00000001"
if cstr(GUIPar) ="" or IsNull( GUIPar ) then
Response.Redirect "http://localhost/error1.asp"
end if
%>
<center>
<p>xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
<script Language="VBScript">
Proxy.CreateInstance
dim GUID
dim objCurrentEntity
dim x
x =0
GUID = "{<%=GUIPar%>}"
Sub Proxy_OnLogon
im st
MsgBox "Successful Logon"
st = Proxy.IsLoggedOn
if st = False then
<% set STO = "Offline Service" %>
end if
End Sub
</script>
</body>
</html>
jimusa
|