Jeg får følgende fejl når jeg kører denne funktion
Sub AddToBase2(ByVal sender As Object, ByVal e As EventArgs)
Dim cn As Data.OleDb.OleDbConnection Dim cmd As Data.OleDb.OleDbCommand Dim str As String
cn = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DATA Source=E:\Documents\My documents\dotnet\WebSite11_ver2_20070104_0014\db\database.mdb") cn.Open() str = "UPDATE DB set companyname='"& companyname.Text &"', campaignname='"&campaignname.Text&"' where id=1" 'string stores the command and CInt is used to convert number to string cmd = New Data.OleDb.OleDbCommand(str, cn) cmd.ExecuteNonQuery()
End Sub
Jeg har to felter som jeg gerne vil gemme data af og de hedder campaignname og companyname.
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
Partial Class _Default Inherits System.Web.UI.Page
Sub AddToBase2(ByVal sender As Object, ByVal e As EventArgs)
Dim companyname As TextBox Dim campaignname As TextBox
Dim cn As Data.OleDb.OleDbConnection Dim cmd As Data.OleDb.OleDbCommand Dim str As String
cn = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;DATA Source=E:\Documents\My documents\dotnet\WebSite11_ver2_20070104_0014\db\database.mdb") cn.Open() str = "UPDATE DB set companyname='" & companyname.Text &"',campaignname='"& campaignname.Text &"' where id=1" 'string stores the command and CInt is used to convert number to string cmd = New Data.OleDb.OleDbCommand(str, cn) cmd.ExecuteNonQuery()
Jeg løste det ved at arbejde videre på den computer hvor jeg havde startet. Der var åbenbart gået et eller andet galt ved overførelsen eller noget i den retning. Jeg får nu fekl i følgende linie
str = "UPDATE DB set [companyname]='" & companyname.Text & "',[campaignname]='" & campaignname.Text & "' where id=1"
Det virker som om at den finder et forkert felt som ikke indeholder noget og derfor laver fejl i sql sætningen da den er NULL.
Public companyname As TextBox = New TextBox Public campaignname As TextBox = New TextBox
sidstenævnte er tomme.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.