Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim strSql As String = "SELECT * FROM tblNewOrderNum"
Dim objData AS New DataSet()
Dim objConn As New OledbConnection(Application("dbAccess"))
Dim objAdapt As New OleDbDataAdapter(strSql, objConn)
Dim objTable As DataTable
Dim objRow As DataRow
Dim strNewNumI, strNewNum As String
objAdapt.Fill(objData, "NewOrders")
Try
objAdapt.UpdateCommand = new oledbcommand("UPDATE tblNewOrderNum SET wOrders = ? ", objConn)
objAdapt.Updatecommand.Parameters.Add("@myParam", system.data.oledb.OleDbType.VarWChar, 15).Value = someValue
objAdapt.Updatecommand.parameters("@myParam").sourcecolumn="originalColumn"
objAdapt.Update(objData, "NewOrders")
Catch ex As Exception
Msg.Text = ex.ToString
End Try