<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body><%
dim conn,rs,connstr,sqlcmd
set conn=Server.CreateObject("Adodb.connection")
connstr="PROVIDER=SQLOLEDB;data source=localhost;uid=ZBTEST;pwd=123456;database=ZBTEST;"
conn.open connstr
sqlcmd="select LGID,OPTIME from Login"
Set rs=Server.CreateObject("Adodb.recordset")
rs.open sqlcmd,conn
Response.write("123hgj"&rs("LGID"))
rs.close
set rs=nothing
set conn=nothing
%></body>
</html>