|
|
|
|
|
| | |
| |
Active Server Pages help tutorial how to ASP Help ASP Tutorials ASP Programming ASP Code - ASP Free CJWSoft ASPProtect ASPBanner ASPClassifieds
(Advanced)
(Components)
(Database)
(General)
(Vbscript)
|
|
|
|
Subject: |
Urgent Help, pls! Thanks. |
|
From: |
feix |
|
Date: |
6/8/2001 2:03:15 AM |
|
IP: |
165.21.21.39 |
Is the below part, which is a part of my Global.asa file. Thanks for your help.
Sub Session_OnEnd
' Decrease the active visitors count when the session ends.
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
'create ADO connection object and connect to Oracle database.
set conn = server.createObject("adodb.connection")
conn.open = "dsn=Impact;uid="&session("username")&";pwd="&session("password")&";"
SQL = "SELECT trim(registeree_id) FROM impactadm.onlinereq WHERE trim(status)='In Progress'"
Set rs_id=server.createobject("ADODB.RecordSet")
set rs_id=conn.execute(SQL)
if rs_id("trim(registeree_id)")=session("username") then
SQL_b = "UPDATE impactadm.onlinereq SET status='OPEN', registeree_id=''where trim(registeree_id)='"&session(username)&"' and trim(status)='In Progress'"
conn.execute(SQL_b)
end if
End Sub |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
