📄 parameters.aspx
字号:
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<html>
<head>
<H4>Using Parameters</H4>
<script language="VB" runat="server">
Sub Page_Load(Source As Object, E As EventArgs)
Dim myConnection As OleDbConnection
Dim dr As OleDbDataReader
Dim ConnStr As String
'Connect
ConnStr = "Provider=SQLOLEDB; Data Source=(local); Initial Catalog=Pubs; User ID=sa"
myConnection = New OleDbConnection(ConnStr)
'command
Dim myCommand As New OleDbCommand("p_authors", myconnection)
myCommand.CommandType = CommandType.StoredProcedure
'Parameter object
Dim objParam As OleDbParameter
objParam = myCommand.Parameters.Add("State", OleDbType.VarChar, 10)
objParam.Direction = ParameterDirection.Input
objParam.Value = "CA"
Try
'open the connection and execute the command
myconnection.Open()
'ExecuteReader returns a Reader
dr = myCommand.ExecuteReader()
Catch objError As Exception
'display error details here and stop execution on error
Exit Sub '
End Try
DataGrid1.DataSource=dr
DataGrid1.DataBind()
End Sub
</script>
</head>
<body>
<form runat=server>
<asp:DataGrid id="DataGrid1" runat="server" />
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -