|
| |
|
 |
部落格貼紙串聯數
<%
Set conn1 = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("html/counter.mdb")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
SET rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open "Select * From counters" , conn1,1,3
Response.Write(rs1("TOTAL"))
rs1.close()
set rs1 = nothing
conn1.close()
set conn1 = nothing
%>
張 |
|
 |
|
 |
|
