I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio 1 2 3
stellasp
stellasp
il 27 aprile 2005 alle 17:05
52 messaggi dal 25 febbraio 2004
Sto andando per tentativi....
mi chiedo:
i valori scritti come numeri per es.

'2525', '2536', '26566'

verranno inseriti in campi di tipo testo o numerico?
Se sono di tipo numerico devi togliere gli apici...

dopo questo non saprei più dove potrebbe essere il problema...

ma hai provato a scrivere la query come ti consigliavo prima (cioè concatenando la variabile ITTSQL)?
stellasp
RispondiQuoting
uitko
uitko
il 27 aprile 2005 alle 17:15
18 messaggi dal 02 agosto 2004
i valori sono testo.

ho fatto come dicevi tu e ho il seguente risultato:

False2356', '00772255111')

poi ho modificato la linea di Nazione2 sul finale con & "', '"

e il risultato è come all'inizio. La concatenazionne è possibile in tutti e due i modi ma il risultato non cambia.

AIUTOOOOOOOOOOO
Modificato da uitko il 27 aprile 2005 17.20 -
RispondiQuoting
stellasp
stellasp
il 27 aprile 2005 alle 17:28
52 messaggi dal 25 febbraio 2004
Sì mi era sfuggito un '& _'

mi spiace ma non capisco dov'è l'errore...

spero che qualcuno venga in tuo aiuto
stellasp
RispondiQuoting
stellasp
stellasp
il 27 aprile 2005 alle 17:30
52 messaggi dal 25 febbraio 2004
ah ho scoperto che c'era anche una parentesi di troppo, dopo Descrizione2 

ITTSQL = "Insert Into Contatti (Tipo_contatto, MarkUp, Password, Opzione1, Opzione2, Opzione3, Opzione4, Opzione5, "
ITTSQL = ITTSQL & "Disp, Fornitore, IATA, Pax_Number, Licence_Number, Societa, Titolo, Nome, Secondo_Nome, Cognome, "
ITTSQL = ITTSQL & "Posizione, Indirizzo, CAP, Citta, Provincia, Regione, Nazione, Telefono, Telefono_2, Fax, Cellulare, "
ITTSQL = ITTSQL & "Email, Web, Descrizione, Societa2, Titolo2, Nome2, Secondo_Nome2, Cognome2, Posizione2, Indirizzo2, "
ITTSQL = ITTSQL & "CAP2, Citta2, Provincia2, Regione2, Nazione2, Telefono2, Fax2, Cellulare2, Email2, Web2, Descrizione2, "
ITTSQL = ITTSQL & "Banca, Cc, ABI, CAB, CIN, IBAN, SWIFT, PIVA) "
ITTSQL = ITTSQL & "VALUES ('" & Tipo_contatto & "', " & MarkUp & ", '" & Password & "', " & Opzione1 & ", " & Opzione2 & ", " & Opzione3 & ", "
ITTSQL = ITTSQL & Opzione4 & ", " & Opzione5 & ", " & Disp & ", " & Fornitore & ", '" & IATA & "', '" & Pax_Number & "', '" & Licence_Number & "', '"
ITTSQL = ITTSQL & Societa & "', '" & Titolo & "', '" & Nome & "', '" & Secondo_Nome & "', '" & Cognome & "', '" & Posizione & "', '"
ITTSQL = ITTSQL & Indirizzo & "', '" & CAP & "', '" & Citta & "', '" & Provincia & "', '" & Regione & "', '" & Nazione & "', '"
ITTSQL = ITTSQL & Telefono & "', '" & Telefono_2 & "', '" & Fax & "', '" & Cellulare & "', '" & Email & "', '" & Web & "', '"
ITTSQL = ITTSQL & Descrizione & "', '" & Societa2 & "', '" & Titolo2 & "', '" & Nome2 & "', '" & Secondo_Nome2 & "', '" & Cognome2 & "', '"
ITTSQL = ITTSQL & Posizione2 & "', '" & Indirizzo2 & "', '" & CAP2 & "', '" & Citta2 & "', '" & Provincia2 & "', '" & Regione2 & "', '"
ITTSQL = ITTSQL & Nazione2 & "', '" & Telefono2 & "', '" & Fax2 & "', '" & Cellulare2 & "', '" & Email2 & "', '" & Web2 & "', '"
ITTSQL = ITTSQL & Descrizione2 & "', '" & Banca & "', '" & Cc & "', '" & ABI & "', '" & CAB & "', '" & CIN & "', '" & IBAN & "', '"
ITTSQL = ITTSQL & SWIFT & "', '" & PIVA & "')"
stellasp
RispondiQuoting
uitko
uitko
il 27 aprile 2005 alle 17:38
18 messaggi dal 02 agosto 2004
stesso messaggio di errore
RispondiQuoting
chiccosimo
chiccosimo
il 27 aprile 2005 alle 17:50
2.198 messaggi dal 30 novembre 2001
prova facendo l'insert un pezzo alla volta: cioè
ITTSQL = "Insert Into Contatti (Tipo_contatto, MarkUp, Password) VALUES ('" & Tipo_contatto & "', " & MarkUp & ", '" & Password & "'")"
e vedi se così ti funziona.
RispondiQuoting
uitko
uitko
il 27 aprile 2005 alle 18:24
18 messaggi dal 02 agosto 2004
Sto' provando un pezzo per volta aggiungendo un valore per volta. Con pochi valori funziona e credo che il valore Markup(unico valore numerico) stava creando problemi.

Vi farò sapere il risultato fiale.

Per ora grazie mille a tutti.
RispondiQuoting
Cornero_Umberto
Cornero_Umberto
il 27 aprile 2005 alle 19:05
4 messaggi dal 02 novembre 2003
uitko ha scritto:
Grazie..

La query è la seguente:

ITTSQL = "Insert Into Contatti (Tipo_contatto, MarkUp, Password, Opzione1, Opzione2, Opzione3, Opzione4, Opzione5, " & _
"Disp, Fornitore, IATA, Pax_Number, Licence_Number, Societa, Titolo, Nome, Secondo_Nome, Cognome, Posizione, Indirizzo, CAP, " & _
"Citta, Provincia, Regione, Nazione, Telefono, Telefono_2, Fax, Cellulare, Email, Web, Descrizione, Societa2, " & _
"Titolo2, Nome2, Secondo_Nome2, Cognome2, Posizione2, Indirizzo2, CAP2, Citta2, Provincia2, Regione2, Nazione2, " & _
"Telefono2, Fax2, Cellulare2, Email2, Web2, Descrizione2, Banca, Cc, ABI, CAB, CIN, IBAN, SWIFT, PIVA) VALUES " & _
"('" & Tipo_contatto & "', " & MarkUp & ", '" & Password & "', " & Opzione1 & ", " & Opzione2 & ", " & Opzione3 & ", " & _
Opzione4 & ", " & Opzione5 & ", " & Disp & ", " & Fornitore & ", '" & IATA & "', '" & Pax_Number & "', '" & Licence_Number & "', '" & _
Societa & "', '" & Titolo & "', '" & Nome & "', '" & Secondo_Nome & "', '" & Cognome & "', '" & Posizione & "', '" & _
Indirizzo & "', '" & CAP & "', '" & Citta & "', '" & Provincia & "', '" & Regione & "', '" & Nazione & "', '" & _
Telefono & "', '" & Telefono_2 & "', '" & Fax & "', '" & Cellulare & "', '" & Email & "', '" & Web & "', '" & _
Descrizione & "', '" & Societa2 & "', '" & Titolo2 & "', '" & Nome2 & "', '" & Secondo_Nome2 & "', '" & Cognome2 & "', '" & _
Posizione2 & "', '" & Indirizzo2 & "', '" & CAP2 & "', '" & Citta2 & "', '" & Provincia2 & "', '" & Regione2 & "', '" & _
Nazione2 & "', '" & Telefono2 & "', '" & Fax2 & "', '" & Cellulare2 & "', '" & Email2 & "', '" & Web2 & "', '" & _
Descrizione2 & "', '" & Banca & "', '" & Cc & "', '" & ABI & "', '" & CAB & "', '" & CIN & "', '" & IBAN & "', '" & _
SWIFT & "', '" & PIVA & "')"

io proverei a scrivere il codice così:


Session.TimeOut = 20
  Set Conn = Server.CreateObject("ADODB.Connection")
  Conn.Open "DBQ=" & Server.Mappath("db.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

  Set oRs = Server.CreateObject("ADODB.recordset")
    oRs.Source = "SELECT * FROM Contatti"
    oRs.LockType = 3
    oRs.Open
    oRs.AddNew
    oRs("Tipo_contatto")  = Tipo_contatto
    oRs("MarkUp")      = MarkUp
    oRs("Opzione1")      = Opzione1
    oRs("Opzione2")      = Opzione2
    oRs("Opzione3")      = Opzione3
    oRs("Opzione4")      = Opzione4
    oRs("Opzione5")      = Opzione5
    oRs("Disp")        = Disp 
    oRs("Fornitore")    = Fornitore
    oRs("IATA")        = IATA
    oRs("Pax_Number")    = Pax_Number
    oRs("Licence_Number")  = Licence_Number
    oRs("Societa")      = Societa
    oRs("Titolo")      = Titolo
    oRs("Nome")        = Nome
    oRs("Secondo_Nome")    = Secondo_Nome
    oRs("Cognome")      = Cognome
    oRs("Posizione")    = Posizione
    oRs("Indirizzo")    = Indirizzo
    oRs("CAP")        = CAP
    oRs("Citta")      = Citta
    oRs("Provincia")    = Provincia
    oRs("Regione")      = Regione
    oRs("Nazione")      = Nazione
    oRs("Telefono")      = Telefono
    oRs("Telefono_2")    = Telefono_2
    oRs("Fax")        = Fax
    oRs("Cellulare")    = Cellulare
    oRs("Email")      = Email
    oRs("Web")        = Web
    oRs("Descrizione")    = Descrizione
    oRs("Societa2")      = Societa2
    oRs("Titolo2")      = Titolo2
    oRs("Nome2")      = Nome2
    oRs("Secondo_Nome2")  = Secondo_Nome2
    oRs("Cognome2")      = Cognome2
    oRs("Posizione2")    = Posizione2
    oRs("Indirizzo2")    = Indirizzo2
    oRs("CAP2")        = CAP2
    oRs("Citta2")      = Citta2
    oRs("Provincia2")    = Provincia2
    oRs("Regione2")      = Regione2
    oRs("Nazione2")      = Nazione2
    oRs("Telefono2")    = Telefono2
    oRs("Fax2")        = Fax2
    oRs("Cellulare2")    = Cellulare2
    oRs("Email2")      = Email2
    oRs("Web2")        = Web2
    oRs("Descrizione2")    = Descrizione2
    oRs("Banca")      = Banca
    oRs("Cc")        = Cc
    oRs("ABI")        = ABI
    oRs("CAB")        = CAB
    oRs("CIN")        = CIN
    oRs("IBAN")        = IBAN
    oRs("SWIFT")      = SWIFT
    oRs("PIVA")        = PIVA
    oRs.Update
    oRs.Close
%>

magari così funziona !!
ciao
RispondiQuoting
1 2 3

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.