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

📄 ch15-01-01.aspx

📁 这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助
💻 ASPX
字号:
<%@ Import NameSpace="System.Data" %>
<%@ Import NameSpace="System.Data.OleDb" %>
<% Response.Expires = 0 %>
<Html>
<Head>
<Script Language="VB" Runat="Server">
   Sub Page_Load(Obj As Object, e As EventArgs)
        Dim DSN As String, tSQL As String
        Dim Counts As Integer
       ' 设置使用联机字符串 
DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
           Server.MapPath("/ASP/Chap14/ASP.NET网页数据库.mdb") & ";"
tSQL = "INSERT INTO UserDatas(UserAccount, UserPWD, UserName, EMail)"
tSQL = tSQL & " VALUES('Dannis','11223', '王正伟', 'Dannis@mail.text.net')"
      ' 使用联机字符串创建连接
Dim OBJConn As OleDBConnection = New OleDbConnection(DSN)
       OBJConn.Open()      ' 创建数据库连接
Dim OBJCmd As OleDBCommand = New OleDbCommand(tSQL, OBJConn)
       ' 执行SQL语句
       Counts = OBJCmd.ExecuteNonQuery()
       If Counts >= 1 Then
          Show1.InnerHtml = "添加记录成功!"
       Else
          Show1.InnerHtml = "添加记录失败!"
        End If
      OBJConn.Close()
    End Sub
 </Script>
</Head>
<Body>
<Span ID="Show1" Runat="Server" />
</Body>
</Html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -