Errore di sintassi...

[sms]

Originariamente inviato da dwb
Ecco il codice dopo i suggerimenti, ma l'errore è lo stesso:

<script runat="server">
		Sub Page_Load(obj as object, e as EventArgs)
		Dim conn as New oleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;" & _
		"Data Source=c:\Dev\Data\banking.mdb")
		Dim ds as new DataSet("MyDataSet")
		Dim objCmd as new OleDbDataAdapter("SELECT * FROM tblUsers WHERE UserID < 10", Conn)
		objCmd.Fill(ds, "tblUsers")
        ds.Tables("tblUsers").Rows(2)(3) = "ASPVille"
        Dim dr as DataRow = ds.Tables("tblUsers").NewRow()
        dr(0) = "Greg"
        dr(1) = "Smith"
        dr(2) = "434 Maple Apt B"
        dr(3) = "Minneapolis"
        dr(4) = "MN"
        dr(5) = "12588"
        dr(6) = "5189876259"
        ds.Tables("tblUsers").Rows.Add(dr)
        objCmd.UpdateCommand = new OleDbCommand
        objCmd.UpdateCommand.CommandText = "Update tblUsers " & _
        "SET City='ASPVille' WHERE UserID=3"
        objCmd.UpdateCommand.Connection = Conn
        objCmd.InsertCommand = new OleDbCommand
        objCmd.InsertCommand.CommandText="Insert INTO " & _
        "tblUsers (FirstName, Lastname, Address, City, " & _
        "Stato, ZIP, Phone) VALUES ( 'Greg', 'Smith', " & _
        "'434 Maple Apt B', 'Minneapolis', 'MN', '12588', " & _
        "'5189876259')"
        objCmd.InsertCommand.Connection = Conn
        End Sub
		</script>

xkè io quella parentesi continuo a non vederla?
cmq fai un response.write del tutto, almeno viene + facile individuare l'errore.

[dwb]

Modificata anche quella: problema uguale!

Originariamente inviato da cicciociccioxxx
credo che anche address sia una proprietà di access

[dwb]

x sms
Ho messo anche la parentesi...

<script runat="server">
		Sub Page_Load(obj as object, e as EventArgs)
		Dim conn as New oleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;" & _
		"Data Source=c:\Dev\Data\banking.mdb")
		Dim ds as new DataSet("MyDataSet")
		Dim objCmd as new OleDbDataAdapter("SELECT * FROM tblUsers WHERE UserID < 10", Conn)
		objCmd.Fill(ds, "tblUsers")
        ds.Tables("tblUsers").Rows(2)(3) = "ASPVille"
        Dim dr as DataRow = ds.Tables("tblUsers").NewRow()
        dr(0) = "Greg"
        dr(1) = "Smith"
        dr(2) = "434 Maple Apt B"
        dr(3) = "Minneapolis"
        dr(4) = "MN"
        dr(5) = "12588"
        dr(6) = "5189876259"
        ds.Tables("tblUsers").Rows.Add(dr)
        objCmd.UpdateCommand = new OleDbCommand
        objCmd.UpdateCommand.CommandText = "Update tblUsers " & _
        "SET City='ASPVille' WHERE UserID=3"
        objCmd.UpdateCommand.Connection = Conn
        objCmd.InsertCommand = new OleDbCommand
        objCmd.InsertCommand.CommandText="Insert INTO " & _
        "tblUsers (FirstName, Lastname, Indirizzo, City, " & _
        "Stato, ZIP, Phone) VALUES ( 'Greg', 'Smith', " & _
        "'434 Maple Apt B', 'Minneapolis', 'MN', '12588', " & _
        "'5189876259')"
        objCmd.InsertCommand.Connection = Conn
        End Sub
		</script>

Errore identico!Per il response.write nn ho ben capito cosa devo fare..

[sms]

response.write(objCmd.InsertCommand.CommandText)

[cicciociccioxxx]

non vorrei essere così noiosa, ma non puoi mettere indirizzoUsr e StatoUsr?
fallo per farmi tacere

[dwb]

Guarda.. anche in questo caso mi da quell'errore!!

<script runat="server">
		Sub Page_Load(obj as object, e as EventArgs)
		Dim conn as New oleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;" & _
		"Data Source=c:\Dev\Data\banking.mdb")
		Dim ds as new DataSet("MyDataSet")
		Dim objCmd as new OleDbDataAdapter("SELECT * FROM tblUsers WHERE UserID < 10", Conn)
		objCmd.Fill(ds, "tblUsers")
        ds.Tables("tblUsers").Rows(2)(3) = "ASPVille"
        Dim dr as DataRow = ds.Tables("tblUsers").NewRow()
        dr(0) = "Greg"
        dr(1) = "Smith"
        dr(2) = "434 Maple Apt B"
        dr(3) = "Minneapolis"
        dr(4) = "MN"
        dr(5) = "12588"
        dr(6) = "5189876259"
        ds.Tables("tblUsers").Rows.Add(dr)
        objCmd.UpdateCommand = new OleDbCommand
        objCmd.UpdateCommand.CommandText = "Update tblUsers " & _
        "SET City='ASPVille' WHERE UserID=3"
        objCmd.UpdateCommand.Connection = Conn
        objCmd.InsertCommand = new OleDbCommand
        objCmd.InsertCommand.CommandText="Insert INTO " & _
        "tblUsers (FirstName, Lastname, Indirizzo, City, " & _
        "Stato, ZIP, Phone) VALUES ( 'Greg', 'Smith', " & _
        "'434 Maple Apt B', 'Minneapolis', 'MN', '12588', " & _
        "'5189876259')"
        response.write(objCmd.InsertCommand.CommandText)
        objCmd.InsertCommand.Connection = Conn
        objCmd.Update(ds, "tblUsers")
        
        End Sub
		</script>

Originariamente inviato da sms
response.write(objCmd.InsertCommand.CommandText)

[dwb]

Fatto... nessuna news!

Originariamente inviato da cicciociccioxxx
non vorrei essere così noiosa, ma non puoi mettere indirizzoUsr e StatoUsr?
fallo per farmi tacere

[cicciociccioxxx]

Originariamente inviato da dwb
Fatto... nessuna news!

in effetti ho provato a fare un inserimento identico al tuo e a me funziona tutto
come tipo di dati nella tabella ho usato solo stringhe.
tu usi qualche campo numerico?

[dwb]

Si...

Guarda il mio db:

[dwb]

Il codice l'ho provato sul serve e funziona a meraviglia!!A sto punto è quasi elementare dire che dipdende dal mio pc!Ma quale potrebbe essere il problema?