%@ language=vbscript %> <% dim counter,exec,rs1,rs exec="select * from counter" set conn=server.createobject("ADODB.connection") conn.open"dsn=blackrosa;uid=sz_blackrosa;pwd=rosa*78d" set rs=conn.execute(exec) fcounter=rs("counter")+1 exe1="update counter set counter="&fcounter&" " set rs1=conn.execute(exe1) set rs2=conn.execute(exec) %> <% set rs=nothing set rs1=nothing set rs2=nothing set conn=nothing %>
|
|
||||
![]() |
![]() |
![]() |
![]() |
|
![]() |
![]() |
![]() |
![]() |
|
![]() |
![]() |
![]() |
![]() |
|
|
|
||||
|
|
|
|||