particular.aspx
来自「《ASP.NET C#程序设计案例教程》」· ASPX 代码 · 共 32 行
ASPX
32 行
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
Dim conn As New SqlConnection("Server=localhost;Database=address;Uid=test;Pwd=123456")
'建立SQL语句,请注意要获取传递过来的id的值
Dim strSql As String
strSql="Select * From users Where id=" & Request.QueryString("id")
Dim cmd As New SqlCommand(strSql, conn) '建立Command对象
conn.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader() '建立DataReader对象
'下面开始显示数据
dr.Read() 'dr.Read()就会读取当前记录
message.Text = "姓名:" & dr.Item("name")
message.Text &= "<br>电话:" & dr.Item("tel")
message.Text &= "<br>email:<a href='mailto:" & dr.Item("email") & "' target='_blank'>" & dr.Item("email") & "</a>"
message.Text &= "<br>简介:" & dr.Item("intro")
message.Text &= "<br>提交时间:" & dr.Item("submit_date")
conn.Close()
End Sub
</script>
<html>
<head>
<link href="Style.css" type="text/css" rel="stylesheet">
</head>
<body >
<h3 align="center">详细信息</h3>
<asp:Label id="message" runat="server"/>
<center><a href="JavaScript:close();">关闭窗口</a></center>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?