%
Session( "Connect" ) = "DBQ=" + Server.MapPath(".") + "\Sample_3.mdb;DRIVER=Microsoft Access Driver (*.mdb);UID=admin;PWD="
set rs = Server.CreateObject("ADODB.Recordset")
StrSQL = "SELECT * FROM SN_Counter Where Table_name='Count'"
rs.Open StrSQL,Session("Connect"),2,2,1
rs("SN") = rs("SN") + 1
rs.Update
rs.Close
set rs = nothing
'
'
set rs1 = Server.CreateObject("ADODB.Recordset")
'StrSQL = "SELECT * FROM SN_Counter Where Table_name='Count'"
rs1.Open StrSQL,Session("Connect"),2,2,1
count=Cstr(rs1("SN"))
For i = 1 to (10-Len(count))
Gdraw = Gdraw & ""
Next
For i = 1 to Len(count)
Gdraw = Gdraw & "
"
Next
rs1.close
set rs1=nothing
%>
![]() |
|
||||||||||||||||||||||||||||
|
<% =ImgStr %>
![]() |
|||||||||||||||||||||||||||||
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||