update na bazu ??

Pozdrav svima

Ja sam novi ovdje i pozdravljam sve koji su aktivni na ovom firumu i evo imam jedan problem
koji pokusavam da rijesim ali bezuspjesno. Ovako imam formu u VB.NETu koji sam povezao sa
Access bazom i na izlazu dobijam podatke sto znaci da je povezivanje uspjesno. Sada me zanima
kako da recimo kada novi korisnik unosi svoje podatke na formi da mi se ti podaci
abdejtuju u bazu znam da ima veze sa insert upade ali ne znam kako to da odradim, zahvalio bi
se unaprijed svima koji pomognu...

za update:
UPDATE table_name
SET field1 = neka_vrednost, field2 = neka_vrednost...itd.
WHERE uslov

za insert:
INSERT INTO table_name (field1, field2....) VALUES (neka_vrednost, neka_vrednost....)

Potpis

Djankam se, kuzish.

Hvala na tome ali nisam uspio, imam dugme Sumit i klikom na njega zelim da mi podaci budu snimljeni u bazu, unio sam prethodni kod ali sada nista neradi kako treba..

Koji kod si koristio da upises podatke u bazu? Kako izgleda kod iza OnClick eventa? Koji error message dobijes? Ako je problem u SQL upitu, jet engine bi trebao nazad da ti vrati poruku koja manje/vise kaze sta ne valja.

Potpis

All beer is good. Some beer is better.

detalji, detalji... Bez njih nista konkretno neces dobiti.

Potpis

Djankam se, kuzish.

Probaj ovako. Koristila sam Northwind bazu i Employees tabelu. Ako bude problema pošalji celi kod koji ti piše iza click događaja dugmeta za Insert.

Private Sub bInsert_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles bInsert.Click

'connection string za otvaranje connection objekta, pazi na putanju!
Dim sCNS As String
sCNS = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind.mdb;"

'konekcija za komunikaciju sa bazom
Dim cn As New OleDb.OleDbConnection(sCNS)

'komandni objekat koji izvrsava radnje
Dim cmd As New OleDb.OleDbCommand

'SQL string koji pretstavlja INSERT naredbu SQL-a
Dim sSQL As String
sSQL = "INSERT INTO Employees (FirstName,LastName) " _
& " VALUES ('Milena','Petrović')"

Try
'otvaram kontekciju
cn.Open()
'setujem komandni objekat
With cmd
.Connection = cn
.CommandType = CommandType.Text
.CommandText = sSQL
.ExecuteNonQuery()
End With
MessageBox.Show("Zaposlen dodat u bazu.", "Zaposleni", _
MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch ex As Exception
MessageBox.Show(ex.Message, "Greška", MessageBoxButtons.OK, _
MessageBoxIcon.Error)
Finally
cn.Close()
End Try
End Sub

hm hm ja zaista ne znam u cemu je problem, pokusao i sa kodom od Jelene u principu
nejavlja mi gresku, imam samo jednostavnu formu ime i prezime i dugmic Insert ali
neide. Nejavlja mi gresku prode sve bez problema povezano je sa bazom ali klikom na
Insert nista se nedogada u bazu se nista nesnima, kod je kao prethodni koji je Jelena
stavila i povezano je sa bazom na isti nacin hm hm imam neke tutoriale ali nista
konkretno o ovome nema... dobro bi dosao neki konkretan primjer da uporedim kako to sve ide...

Pozdrav

Da li klik na Submit poziva dogadjaj koji izvrsava upit?

Potpis

dotnet

Pa pokusao sam sa kodom koji je jelena postavila,

Dim sSQL As String
sSQL = "INSERT INTO Employees (FirstName,LastName) " _
& " VALUES ('Milena','Petrović')"

ovaj dio trebao bi da realizira podatke u bazu a nista se ne dogada samo prosleduje
naredbu na Submit kao da je izvrsena.. pozdrav

Uh, uh, uh!

Kod:

Dim sSQL As String
sSQL = "INSERT INTO Employees (FirstName,LastName) " _
& " VALUES ('Milena','Petrović')"

Ništa ne radi, to je postavljanje vrednosti stringa. Ono što radi Insert u bazu je Commandni objekat i njegova metoda ExecuteNonQuery.

Treba da iskopiraš celu rutinu koju sam napisala. Kod mene to radi i nema razloga da kod tebe ne radi. Bilo bi krajnje poželjo da nam postaviš ceo kod koji si napisao za Click događaj dugmete Insert ili Submit kako ti se već dugme zove.

a ne ne nismo se razumeli to je bio odgovor za dotnet-a nisam samo taj kod upisao imam sledeci kod na insert dugmic :

Dim sCNS As String
sCNS = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\Program Files\Microsoft Office\OFFICE10\SAMPLES\Northwind.mdb;"


Dim cn As New OleDb.OleDbConnection(sCNS)


Dim cmd As New OleDb.OleDbCommand

'SQL string koji pretstavlja INSERT naredbu SQL-a
Dim sSQL As String
sSQL = "INSERT INTO Employees (ime,prezime) " _
& " VALUES ('Milena','Petrovic')"

End Sub

E, sad ti fali još samo malo.. Da pridružiš vrednosti svojstvima objekata, otvoriš konekciju, izvršiš komandu i zatvoriš konekciju.

Pogledaj još jednom odgovor Jelene i ono što se nalazi u bloku Try-Catch-End Try.

Potpis

Commercial-Free !!!

Mislim da sam sada sve pridruzio i pravilno uradio ali dobijam gresku tipa :

Line 43: .CommandType = CommandType.Text
Line 44: .CommandText = sSQL


Line 45: .ExecuteNonQuery() - ovde mi javlja gresku

Line 46: End With
Line 47: Finally