📄 personinfo.aspx
字号:
<%@ import namespace="system.data"%>
<%@ import namespace="system.data.sqlclient"%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="VB" runat="server">
sub page_load(sender as object,e as eventargs)
dim strid as string
strid=request.QueryString("id")
lblmessage.text="性别: " & strid
dim strsqlstring as string
dim mysqlcommstring as string
dim mysqlconn as SQLConnection
dim sqlcomm as SQLCommand
dim mydr as sqldatareader
strsqlstring="server=localhost;uid=sa;pwd=chicken;database=mybbs" '注意密码
mysqlconn=new sqlconnection(strsqlstring)
mysqlcommstring="select * from memberinfo where id='" & strid & "'"
sqlcomm=new sqlcommand(mysqlcommstring,mysqlconn)
mysqlconn.open
mydr=sqlcomm.executereader()
IF mydr.read then
lblqq.text="QQ:" & mydr.item("qq")
if mydr.item("sex")=1 then
lblsex.text="性别: 女"
else
lblsex.text="性别: 男"
end if
lblemail.text="E-MAIL:" & mydr.item("email")
else
lblmessage.text="错误,可能此人已被删除,请刷新"
end if
end sub
</script>
</head>
<body>
<p>
<asp:label ID="lblmessage" runat="server"/>
</p>
<p>
<asp:label ID="lblsex" runat="server"/>
</p>
<p>
<asp:label ID="lblQQ" runat="server"/>
</p>
<p>
<asp:label ID="lblemail" runat="server"/>
</p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -