izmenjeno 1 put, poslednji put unisoft 11.08.2010. u 15:49
Izmene poruke
- unisoft11.08.2010. u 15:49zapis iz teksta poruke
Imam jedan program koji se zove prebacivanje MS Access baze na MS SQL Server :) ? Problem sa javlja kada korisnik upise svoje korisnicko ime i sifru na login formi i pritisne OK. Kada pritisne OK button u kodu postoje 3 promenljive. Prve dve su tipa string a treca je tipa date. Promenljiva cuva strUlazImeP korisnicko ime, u promenljivu strUlazSifraP cuva se sifra korisnika, a u promenljivoj datUlazVremeDatumP se cuva vreme kada je korisnik kliknuo na button ok (ovo vreme sam dobio pomocu funkcije Now()).
u prva dva slucaja radi ali u trecem nece.
Moj VB6 kod izgleda ovako.
promenljiva datUlazVremeDatumP cuva vrednost iz funkcije Now().
Visual Basic 6 mi prijavi sledecu gresku kada kliknem na OK button login forme
Program je napisan u Visual Basic 6 SP6.
Code:
INSERT INTO Podaci (datum,) VALUES ('03/04/1988')
INSERT INTO Podaci (datum,vreme) VALUES ('03/04/1988','23:32;13')
INSERT INTO Podaci (datum,) VALUES ('03/04/1988')
INSERT INTO Podaci (datum,vreme) VALUES ('03/04/1988','23:32;13')
u prva dva slucaja radi ali u trecem nece.
Code:
INSERT INTO Podaci (datum,vreme,vremedatum) VALUES ('03/04/1988','23:32;13','03/04/1988 23:32:13')
INSERT INTO Podaci (datum,vreme,vremedatum) VALUES ('03/04/1988','23:32;13','03/04/1988 23:32:13')
Moj VB6 kod izgleda ovako.
Code:
mdiGlavna.strUpit = "INSERT INTO tblUlazakPokusaj (Korisnik,Šifra,[Vreme i datum]) VALUES ("
mdiGlavna.strUpit = mdiGlavna.strUpit & "'" & mdiGlavna.strUlazImeP & "',"
mdiGlavna.strUpit = mdiGlavna.strUpit & "'" & mdiGlavna.strUlazSifraP & "',"
mdiGlavna.strUpit = mdiGlavna.strUpit & "#" & mdiGlavna.datUlazVremeDatumP & "#)"
mdiGlavna.acnKonekcija.Execute mdiGlavna.strUpit
mdiGlavna.strUpit = "INSERT INTO tblUlazakPokusaj (Korisnik,Šifra,[Vreme i datum]) VALUES ("
mdiGlavna.strUpit = mdiGlavna.strUpit & "'" & mdiGlavna.strUlazImeP & "',"
mdiGlavna.strUpit = mdiGlavna.strUpit & "'" & mdiGlavna.strUlazSifraP & "',"
mdiGlavna.strUpit = mdiGlavna.strUpit & "#" & mdiGlavna.datUlazVremeDatumP & "#)"
mdiGlavna.acnKonekcija.Execute mdiGlavna.strUpit
promenljiva datUlazVremeDatumP cuva vrednost iz funkcije Now().
Visual Basic 6 mi prijavi sledecu gresku kada kliknem na OK button login forme
Code:
Run-time error '-2147217900(80040e14)':
[Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near '15'.
Run-time error '-2147217900(80040e14)':
[Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near '15'.
Program je napisan u Visual Basic 6 SP6.