% set conn=server.createobject("adodb.connection") strcon="provider = microsoft.jet.oledb.4.0;data source="& server.mappath("1-count/num.mdb") conn.open strcon set rstobj=server.createobject("adodb.recordset") rstobj.open "num",conn,3,3 'if request.cookies("as")=empty then rstobj("num")=rstobj("num")+1 rstobj.update 'response.cookies("as")=2 'end if %> <%num1=rstobj("num") %>
|
Qiting Zuo's Website - Hydrology and Water Resources
|
|||||||||||||||||
|