Insert into su sql server con vbasic

[brunok]

Programma in VBASIC, che si collega con database sql server, se do la stringa in ambiente sql-server funziona perfettamente, mentre sul codice seguente (in ambiente vbasic) non funziona.
cerco di eseguire questo codice:

mia_data = Str(Date) & " " & Trim(Str(Hour(Now))) & ":" & Trim(Minute(Now)) & ":" & Trim(Str(Second(Now))) & ":000"
cmd.CommandText = "insert into new_chatters values('oggi','ogginick','1'," & mia_data & " , null, null)"
Set rs = cmd.Execute

mi da un run time error, sintassi errata sul 9. (che dovrebbe essere l'orario), cioè non gli piace la data seguita dall'orario.

[darkblOOd]

come hai dichiarato il campo che deve contenere la data nella tabella SQL?

se è di tipo DateTime prova così:

cmd.CommandText = "insert into new_chatters values('oggi','ogginick','1',#" & mia_data & "# , null, null)"

altrimenti prova a togliere i 3 zeri qui:

mia_data = Str(Date) & " " & Trim(Str(Hour(Now))) & ":" & Trim(Minute(Now)) & ":" & Trim(Str(Second(Now))) & ":000"

Ciao

[brunok]

Allora ho provato con le due soluzioni, ma non va.
E' come se lo spazio tra la data e l'orario gli desse fastidio.

[xit]

Perchè non hai messo il nome del campo?

strSQL = "INSERT INTO Anagrafica (CodFiscale,Cognome) VALUES (' " & iCod & " ',' " & iCognome & "')"

Questa è la struttura Insert into NomeTabella (Nome dei campi)Values(valori che vuoi inserire)

[brunok]

Per quanto ne sappia, il nome dei campi è facoltativo, nel senso che puoi non elencarli, comunque non si sa mai, ma il problema è di sintassi, infatti se invece di assegnare un valore di data (che contiene sia la data che l'ora, il campo è tipo DateTime) assegno una semplice data il tutto fila liscio e assegna i valori ai campi nell'ordine in cui vengono posti i valori.

[xit]

Che i campi siano facoltativi ho i miei dubbi ,perchè se io per
esempio ho 4campi(nome,cognome,indirizzo,città), ma voglio inserire nel mio database 2 valori quelli di nome e cognome certo che devo
specificare questi 2 valori dove deve inserirli se no come fa a saperlo?
Quindi ti funzionerebbe solo così!!Giusto

cmd.CommandText = "insert into new_chatters values('" & mia_data & '")"

[darkblOOd]

allora prova a fare questo

mia_data = CDate(Str(Date) & " " & Trim(Str(Hour(Now))) & ":" & Trim(Minute(Now)) & ":" & Trim(Str(Second(Now))) & ":000")

e poi nella stringa SQl togli i #:

cmd.CommandText = "insert into new_chatters values('oggi','ogginick','1'," & mia_data & ", null, null)"

Al limite prova a mettere un break-poit sulla riga di codice del comando sql, appena si interrompe l'esecuzione dai un colpo di F8 e nella finestraimmediata digita:

? strSQL e dai invio

in questo modo puoi vedere i valori che vengono passati a SQL. Se hai uno strumento tipo il QUery Analyzer di SQL, copia quella stringa ed eseguila direttamente sulla tabella e vedi se ci sono errori di sintassi.

Ciao

[darkblOOd]

Originariamente inviato da xit
Che i campi siano facoltativi ho i miei dubbi ,perchè se io per
esempio ho 4campi(nome,cognome,indirizzo,città), ma voglio inserire nel mio database 2 valori quelli di nome e cognome certo che devo
specificare questi 2 valori dove deve inserirli se no come fa a saperlo?
Quindi ti funzionerebbe solo così!!Giusto

cmd.CommandText = "insert into new_chatters values('" & mia_data & '")"

quello che dici tu è vero ma se specifichi un valore per ogni campo della tabella allora diventano facoltativi, l'importante è rispettare l'ordine dei campi ed includerli tutti.