%@LANGUAGE="VBSCRIPT"%> <%dim conn,rs,strSQL,conta set conn=Server.CreateObject("Adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};dbq=d:\Inetpub\webs\cantareloperacom\mdb-database\dbcontatore.mdb" strSQL="select * from conta" set rs=Server.CreateObject("Adodb.recordset") rs.open strSQL,conn,3,3 conta=rs("click").value conta=conta+1 rs("click").value=conta rs.update rs.close set rs=nothing conn.close set conn=nothing %>
|
![]() |
![]() |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
![]()
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Copyright 2007- Non-profit association "Cantare l'Opera"® |
|
|
||