|
|
| <% dim conn dim connstr Set conn = Server.CreateObject("ADODB.Connection") '设置SQL连接 ' connstr="driver={SQL Server};server=localhost;UID=sa;PWD=;database=club" '设置Access连接 Connstr="DBQ="+server.mappath("../products/picdata.asa")+";DefaultDir='';DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;" conn.Open connstr %> <% dim rs dim sql set rs=server.createobject("adodb.recordset") %> <% sql="select class,classid from Dclass" rs.open sql,conn,1,1 do while not rs.eof %> " class="WhiteLink"><%=rs("class")%> <% rs.movenext loop rs.close %> | |
|
Tai Loy Home |
 |
| |||||||||||||||||||||||
