%@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 %>
|
|
|
© 2007- Non-profit association "Cantare l'Opera" © All rights reserved Use of text, images, layout, format, look, or feel of these pages, without the written permission of the copyright holder is strictly prohibited. Policy |
|
|
|