⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 execute.aspx

📁 聊天 聊天 聊天 聊天 聊天 聊天
💻 ASPX
字号:
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<html>
<head>
<H4>Using execute Keyword</H4>
<script language="VB" runat="server">
  Sub Page_Load(Source As Object, E As EventArgs) 
    
    Dim myConnection As OleDbConnection
    Dim myCommand    As OleDbDataAdapter
    Dim ds           As New DataSet
    Dim ConnStr      As String
    Dim SQL          As String
    'Connect
    ConnStr = "Provider=SQLOLEDB; Data Source=(local); Initial Catalog=Pubs; User ID=sa"
    myConnection = New OleDbConnection(ConnStr)
    'DataSetCommand
    SQL = "Execute p_authors 'CA'"
    myCommand = New OleDbDataAdapter(SQL, myConnection)
    'use Fill method of DataSetCommand to populate dataset
    myCommand.Fill(ds, "Authors")
    'Binding a Grid	
    DataGrid1.DataSource=ds.Tables("Authors").DefaultView
    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 + -