Mega Code Archive
Use SQL directly to insert data into database in VB net
<![CDATA[
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
Dim objConnection As OleDbConnection
Dim objCmd As OleDbCommand
Dim strConnection As String
Dim strSQL As String
strConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source="+MapPath("EmployeeDatabase.mdb")
' Create and open the connection object
objConnection = New OleDbConnection(strConnection)
objConnection.Open()
' set the SQL string
strSQL = "INSERT INTO Employee(FirstName,LastName)" & _
" VALUES ( 'Beth' , 'Hart' )"
' Create the Command and set its properties
objCmd = New OleDbCommand(strSQL, objConnection)
' execute the command
objCmd.ExecuteNonQuery()
lblStatus.Text = "Command run"
End Sub
</script>
<html>
<body>
<h2>Using SQL directly</h2>
<asp:Label id="lblStatus" runat="server"/>
</body>
</html>
EmployeeDatabase.zip( 10 k)
]]>