ho fatto una insert ma il campo data non viene codificato nonostante abbia inserito la codifica cdate().
immetto la data del giorno ma in db mi inserisce 01-01-1900
come fare?
vi irngrazio in anticipo
ho fatto una insert ma il campo data non viene codificato nonostante abbia inserito la codifica cdate().
immetto la data del giorno ma in db mi inserisce 01-01-1900
come fare?
vi irngrazio in anticipo
Forse se metti un po' di codice troviamo l'errore.... :rollo:
Scusate i puntini di sospensione...... La verità è che non ho argomenti....
<%
dim connessione
dim comando
Set connessione = Server.CreateObject("ADODB.Connection")
connessione.Open MM_conn_STRING
Set comando = Server.CreateObject("ADODB.Command")
comando.ActiveConnection = connessione
'insert in PDN1_clone
Dim SQLinsert
SQLinsert = "INSERT INTO pdn1_clone (DocEntry, LineNum, DetLine, cod_sped, n_doc, data_doc, tipo_doc, rit_camp, causale, imp_immag, data_movim, CodMag, WhsCode, Cell, ItemCode, qta) VALUES (" & Request.Form("DocEntry") & " , " & Request.Form("LineNum") & " , " & Request.Form("DetLine") & ", '" & session("login") & "', '" & Request.Form("num_doc") & "', " & cdate(Request.Form("data_doc")) & ", '" & Request.Form("tipo_doc") & "', '" & Request.Form("rit_campionato") & "', '" & Request.Form("causale") & "', " & Request.Form("imp_da_immagaz") & " , " & cdate(Request.Form("data_mov")) & " , '" & Request.Form("code_maga") & "', '" & Request.Form("WhsCode") & "' , '" & Request.Form("cella") & "', " & Request.Form("cod_art") & " , " & Request.Form("qta") & ");"
'inserimento nel giornale
Dim SQLinsert2
SQLinsert2 = "INSERT INTO giornale (DocEntry, LineNum, DetLine, cod_sped, n_contratto, tipo_contratto, numero_mad, fornitore, articolo, magazzino, WhsCode, cella, qta, mod_pag, data_frach, n_doc, tipo_doc, data_doc, data_mov, articolo_mov, qta_mov, ritiro_camp, causale, imp_da_imm, magazzino_mov, cella_mov) VALUES (" & Request.Form("DocEntry") & ", " & Request.Form("LineNum") & ", " & Request.Form("DetLine") & ", '" & Request.Form("cod_sped_g") & "' , '" & Request.Form("num_doc") & "' , '" & Request.Form("tipo_doc") & "' , " & Request.Form("n_mad_g") & " , '" & Request.Form("fornitore_g") & "' , '" & Request.Form("articolo_g") & "' , '" & Request.Form("magazzino_g") & "' , '" & Request.Form("WhsCode") & "' , '" & Request.Form("cella_g") & "' , " & Request.Form("qta_g") & " , '" & Request.Form("mod_pag_g") & "' , " & cdate(Request.Form("data_fr_g")) & " , " & Request.Form("num_doc") & " , '" & Request.Form("tipo_doc") & "', " & cdate(Request.Form("data_doc")) & " , " & cdate(Request.Form("data_mov")) & " , " & Request.Form("cod_art") & ", " & Request.Form("qta") & " , '" & Request.Form("rit_campionato") & "' , '" & Request.Form("causale") & "', '" & Request.Form("imp_da_imm") & "', '" & Request.Form("code_maga") & "' , '" & Request.Form("cella_mov") & "');"
comando.CommandText = SQLinsert
comando.CommandText = SQLinsert2
comando.Execute
Set connessione = Nothing
Set comando = Nothing
%>
ragazzi attendo vs news
prova a farti scrivere la query, perchè credo che la data non arrivi (per questo mette quella)
Scusate i puntini di sospensione...... La verità è che non ho argomenti....