📄 databaseconnect.asp
字号:
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={sql server};server=xhxy.;uid=sa;pwd=;database=xhdlxy"
s="select sfzh as 身份证号,xm 姓名 from jbxxb where sfzh > '55555' order by sfzh desc"
set rs=conn.execute(s)
if conn is nothing then
response.write "failure"
response.end
end if
%>
<table border=2>
<tr bgcolor=#0000ff>
<%
for i=0 to rs.fields.count-1
response.write "<td>"&rs(i).name&"</td>"
next
%>
</tr>
<%rs.movefirst
while not rs.eof
row="<tr>"
for i=0 to rs.fields.count-1
row=row&"<td>"&rs(i)&"</td>"
next
response.write row&"</tr>"
rs.movenext
wend
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -