📄 list.asp
字号:
<%
dim CID
dim mysql
CID=request.querystring("MYid")
mysql="select * from client where uid="&cid
set cn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
cn.connectionstring="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;pwd=sa;Initial Catalog=hotel;Data Source=."
cn.Open
rs.open MySql,cn,1,3
%>
<br><br><br><br><br><br>
<table border=1>
<tr>
<TD>客户号</TD>
<td>姓名</td>
<td>性别</td>
<td>证件类型</td>
<td>证件号</td>
<td>电话</td>
<td>E_mail</td>
<td>邮编</td>
<td>地址</td>
<td>会员</td>
<td>信誉</td>
<td>消费总金额</td>
<td>备注</td>
</tr>
<tr>
<td><input type=text value=<%=rs(1)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(2)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(3)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(4)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(5)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(6)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(7)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(8)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(9)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(10)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(11)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(12)%> size=20 maxlength=20></td>
<td><input type=text value=<%=rs(13)%> size=20 maxlength=20></td>
</tr>
<tr height=20>
<td colspan=13 align=center>
</td>
</tr>
<tr >
<td colspan=13 align=center>
<input type=button name=a1 value="修改">
<input type=button name=a2 value="退出">
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -