la queryil codice asp che mi da problemi
<%
Dim ID_Prodotto
ID_Prodotto = CLng(request.querystring("ID_Prodotto"))
If (ID_Prodotto = 76) Then
ID_Prodotto = 536
End If
Dim ID_ENG
Dim categoria_principale , categoria_secondaria , marca , nome_modello , serie , descrizione
Dim caratteristiche_generali_1 , caratteristiche_generali_2 , caratteristiche_generali_3 , caratteristiche_generali_4 , caratteristiche_generali_5
Dim caratteristiche_generali_6 , caratteristiche_generali_7 , caratteristiche_generali_8 , caratteristiche_generali_9 , caratteristiche_generali_10
Dim caratteristiche_tecniche_1 , caratteristiche_tecniche_2, caratteristiche_tecniche_3, caratteristiche_tecniche_4, caratteristiche_tecniche_5
Dim caratteristiche_tecniche_6, caratteristiche_tecniche_7, caratteristiche_tecniche_8, caratteristiche_tecniche_9, caratteristiche_tecniche_10
Dim caratteristiche_tecniche_11, caratteristiche_tecniche_12, caratteristiche_tecniche_13, caratteristiche_tecniche_14, caratteristiche_tecniche_15
Dim caratteristiche_tecniche_16, caratteristiche_tecniche_17, caratteristiche_tecniche_18, caratteristiche_tecniche_19, caratteristiche_tecniche_20
Dim corsi_1 , corsi_2, corsi_3, corsi_4, corsi_5, corsi_6, corsi_7, corsi_8, corsi_9, corsi_10
Dim cb_elettrico , cb_magnetico , cb_elettromagnetico
Dim cb_tarature , cb_riparazioni , cb_garanzia
Dim cb_accessori , cb_opzioni , stato_prodotto
Dim cb_LaboratorioGrandezzeElettriche, cb_LaboratorioGrandezzeMeccaniche, cb_MisureEMIEMC, cb_UfficioAcquisti, cb_ResponsabileQualita, cb_FisicaSanitaria, cb_PIMImpiantiIndustrialiElettromeccanici
Dim cb_MisureAmbientiDiLavoroCEM, cb_MisureAmbientiDiLavoroRumoreVibrazioni, cb_MisureAmbientaliCEMBF, cb_MisureAmbientaliCEMRF, cb_MisureAmbientaliQualitaAria, cb_MisureAmbientiDiLavoroRadiazioniOttiche
Dim Prezzo , cb_valuta
Dim data_inserimento
Dim codice_pt
Dim datasheet
Dim foto1 , foto2 , foto3 , foto4 , foto5 , foto6
Dim cb_sostituzione_mpb , cb_taratura_std , cb_taratura_sit , cb_taratura_sqt, cb_database , cb_riparazione , cb_vendita , cb_noleggio , cb_misure_e_corsi , cb_vendita_refurbis
Dim cb_presente_web
Dim codiceTrue
Dim numero_prodotti , FAQ
Dim connStringProvider , connStringSource , connString , strConn
Dim strSQL
Dim marca_2 , nome_modello_2 , serie_2
connStringProvider = "Provider=Microsoft.Jet.OLEDB.4.0;"
connStringSource = "Data Source = " + Server.MapPath("/mdb-database/mpbluca/database/ONCEM_MARKET_DATI.mdb")
connString = connStringProvider + connStringSource
strConn = connString
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRs = Server.CreateObject("ADODB.Recordset")
objConn.Open strConn
strSQL = "SELECT COUNT(*) AS RECORD_COUNT FROM dbo_Articoli_mia_eng "
Set objRs = objConn.Execute(strSQL)
numero_prodotti = objRs("RECORD_COUNT")
strSQL = "SELECT "
strSQL = strSQL & "dbo_Articoli_mia_eng.ID AS ID_Prodotto , "
strSQL = strSQL & "dbo_Articoli_mia_eng.categoria_principale AS categoria_principale , "
strSQL = strSQL & "dbo_Articoli_mia_eng.categoria_secondaria AS categoria_secondaria , "
strSQL = strSQL & "dbo_Articoli_mia_eng.marca AS marca , "
strSQL = strSQL & "dbo_Articoli_mia_eng.nome_modello AS nome_modello , "
strSQL = strSQL & "dbo_Articoli_mia_eng.serie AS serie , "
strSQL = strSQL & "dbo_Articoli_mia_eng.codice_pt AS codice_pt , "
strSQL = strSQL & "dbo_Articoli_mia_eng.descrizione AS descrizione , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_1 AS caratteristiche_generali_1 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_2 AS caratteristiche_generali_2 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_3 AS caratteristiche_generali_3 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_4 AS caratteristiche_generali_4 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_5 AS caratteristiche_generali_5 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_6 AS caratteristiche_generali_6 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_7 AS caratteristiche_generali_7 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_8 AS caratteristiche_generali_8 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_9 AS caratteristiche_generali_9 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_generali_10 AS caratteristiche_generali_10 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_1 AS caratteristiche_tecniche_1 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_2 AS caratteristiche_tecniche_2 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_3 AS caratteristiche_tecniche_3 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_4 AS caratteristiche_tecniche_4 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_5 AS caratteristiche_tecniche_5 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_6 AS caratteristiche_tecniche_6 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_7 AS caratteristiche_tecniche_7 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_8 AS caratteristiche_tecniche_8 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_9 AS caratteristiche_tecniche_9 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_10 AS caratteristiche_tecniche_10 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_11 AS caratteristiche_tecniche_11 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_12 AS caratteristiche_tecniche_12 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_13 AS caratteristiche_tecniche_13 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_14 AS caratteristiche_tecniche_14 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_15 AS caratteristiche_tecniche_15 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_16 AS caratteristiche_tecniche_16 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_17 AS caratteristiche_tecniche_17 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_18 AS caratteristiche_tecniche_18 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_19 AS caratteristiche_tecniche_19 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.caratteristiche_tecniche_20 AS caratteristiche_tecniche_20 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_1 AS corsi_1 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_2 AS corsi_2 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_3 AS corsi_3 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_4 AS corsi_4 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_5 AS corsi_5 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_6 AS corsi_6 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_7 AS corsi_7 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_8 AS corsi_8 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_9 AS corsi_9 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.corsi_10 AS corsi_10 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.datasheet AS datasheet , "
strSQL = strSQL & "dbo_Articoli_mia_eng.manuale_1 AS manuale_1, "
strSQL = strSQL & "dbo_Articoli_mia_eng.manuale_2 AS manuale_2, "
strSQL = strSQL & "dbo_Articoli_mia_eng.manuale_3 AS manuale_3, "
strSQL = strSQL & "dbo_Articoli_mia_eng.note_applicative_1 AS note_applicative_1 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.note_applicative_2 AS note_applicative_2 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.note_applicative_3 AS note_applicative_3 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.note_applicative_4 AS note_applicative_4 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.note_applicative_5 AS note_applicative_5 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto1 AS foto1 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto2 AS foto2 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto3 AS foto3 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto4 AS foto4 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto5 AS foto5 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.foto6 AS foto6 , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_elettrico AS cb_elettrico , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_magnetico AS cb_magnetico , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_elettromagnetico AS cb_elettromagnetico , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_accessori AS cb_accessori , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_opzioni AS cb_opzioni , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_tarature AS cb_tarature , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_riparazioni AS cb_riparazioni , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_garanzia AS cb_garanzia , "
strSQL = strSQL & "dbo_Articoli_mia_eng.data_inserimento AS data_inserimento , "
strSQL = strSQL & "dbo_Articoli_mia_eng.stato_prodotto AS stato_prodotto , "
strSQL = strSQL & "dbo_Articoli_mia_eng.CodiceArticolo AS CodiceArticolo , "
strSQL = strSQL & "dbo_Articoli_mia_eng.CodiceCampoApp AS CodiceCampoApp , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_LaboratorioGrandezzeElettriche AS cb_LaboratorioGrandezzeElettriche , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_LaboratorioGrandezzeMeccaniche AS cb_LaboratorioGrandezzeMeccaniche , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureEMIEMC AS cb_MisureEMIEMC , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_UfficioAcquisti AS cb_UfficioAcquisti , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_ResponsabileQualita AS cb_ResponsabileQualita , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_FisicaSanitaria AS cb_FisicaSanitaria , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_PIMImpiantiIndustrialiElettromeccanici AS cb_PIMImpiantiIndustrialiElettromeccanici , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientiDiLavoroCEM AS cb_MisureAmbientiDiLavoroCEM , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientiDiLavoroRumoreVibrazioni AS cb_MisureAmbientiDiLavoroRumoreVibrazioni , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientaliCEMBF AS cb_MisureAmbientaliCEMBF , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientaliCEMRF AS cb_MisureAmbientaliCEMRF , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientaliQualitaAria AS cb_MisureAmbientaliQualitaAria , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_MisureAmbientiDiLavoroRadiazioniOttiche AS cb_MisureAmbientiDiLavoroRadiazioniOttiche , "
strSQL = strSQL & "dbo_Articoli_mia_eng.Prezzo AS Prezzo , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_valuta AS cb_valuta , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_sostituzione_mpb AS cb_sostituzione_mpb , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_taratura_std AS cb_taratura_std , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_taratura_sit AS cb_taratura_sit , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_taratura_sqt AS cb_taratura_sqt , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_database AS cb_database , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_riparazione AS cb_riparazione , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_vendita AS cb_vendita , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_vendita_refurbis AS cb_vendita_refurbis , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_noleggio AS cb_noleggio , "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_misure_e_corsi AS cb_misure_e_corsi, "
strSQL = strSQL & "dbo_Articoli_mia_eng.cb_presente_web AS cb_presente_web, "
strSQL = strSQL & "dbo_Articoli_mia_eng.ID_ENG AS ID_ENG, "
strSQL = strSQL & "dbo_Articoli_mia_eng.FAQ AS FAQ "
strSQL = strSQL & "FROM "
strSQL = strSQL & "dbo_Articoli_mia_eng "
strSQL = strSQL & "WHERE ID = " & ID_Prodotto
Set objRs = objConn.Execute(strSQL)
Do while NOT objRs.EOF
categoria_principale_first = objRs("categoria_principale")
categoria_secondaria_first = objRs("categoria_secondaria")
categoria_principale = objRs("categoria_principale")
categoria_secondaria = objRs("categoria_secondaria")
marca = objRs("marca")
nome_modello = objRs("nome_modello")
serie = objRs("serie")
marca_2 = marca
nome_modello_2 = objRs("nome_modello")
serie_2 = objRs("serie")
codice_pt = objRs("codice_pt")
stato_prodotto = objRs("stato_prodotto")
descrizione = objRs("descrizione")
descrizione = Trim(descrizione)
FAQ = objRs("FAQ")
ID_ENG = objRs("ID_ENG")
cb_sostituzione_mpb = objRs("cb_sostituzione_mpb")
cb_taratura_std = objRs("cb_taratura_std")
cb_taratura_sit = objRs("cb_taratura_sit")
cb_taratura_sqt = objRs("cb_taratura_sqt")
cb_database = objRs("cb_database")
cb_riparazione = objRs("cb_riparazione")
cb_vendita = objRs("cb_vendita")
cb_vendita_refurbis = objRs("cb_vendita_refurbis")
cb_noleggio = objRs("cb_noleggio")
cb_misure_e_corsi = objRs("cb_misure_e_corsi")
'--------------- impostazione del codice --------------------------
codiceTrue = marca & " " & nome_modello
if(serie <> "") Then
codiceTrue = codiceTrue & " " & serie
Else
codiceTrue = codiceTrue
End If
if(codice_pt <> "") Then
codiceTrue = codiceTrue & " " & codice_pt
Else
codiceTrue = codiceTrue
End If
if(cb_sostituzione_mpb <> "") Then
codiceTrue = codiceTrue & " " & cb_sostituzione_mpb
Else
codiceTrue = codiceTrue
End If
if(cb_taratura_std <> "") Then
codiceTrue = codiceTrue & " " & cb_taratura_std
Else
codiceTrue = codiceTrue
End If
if(cb_taratura_sit <> "") Then
codiceTrue = codiceTrue & " " & cb_taratura_sit
Else
codiceTrue = codiceTrue
End If
if(cb_taratura_sqt <> "") Then
codiceTrue = codiceTrue & " " & cb_taratura_sqt
Else
codiceTrue = codiceTrue
End If
if(cb_database <> "") Then
codiceTrue = codiceTrue & " " & cb_database
Else
codiceTrue = codiceTrue
End If
if(cb_riparazione <> "") Then
codiceTrue = codiceTrue & " " & cb_riparazione
Else
codiceTrue = codiceTrue
End If
if(cb_vendita <> "") Then
codiceTrue = codiceTrue & " " & cb_vendita
Else
codiceTrue = codiceTrue
End If
if(cb_vendita_refurbis <> "") Then
codiceTrue = codiceTrue & " " & cb_vendita_refurbis
Else
codiceTrue = codiceTrue
End If
if(cb_noleggio <> "") Then
codiceTrue = codiceTrue & " " & cb_noleggio
Else
codiceTrue = codiceTrue
End If
if(cb_misure_e_corsi <> "") Then
codiceTrue = codiceTrue & " " & cb_misure_e_corsi
Else
codiceTrue = codiceTrue
End If
'-------------- fine impostazione del codice ------------------------
caratteristiche_generali_1 = objRs("caratteristiche_generali_1")
caratteristiche_generali_2 = objRs("caratteristiche_generali_2")
caratteristiche_generali_3 = objRs("caratteristiche_generali_3")
caratteristiche_generali_4 = objRs("caratteristiche_generali_4")
caratteristiche_generali_5 = objRs("caratteristiche_generali_5")
caratteristiche_generali_6 = objRs("caratteristiche_generali_6")
caratteristiche_generali_7 = objRs("caratteristiche_generali_7")
caratteristiche_generali_8 = objRs("caratteristiche_generali_8")
caratteristiche_generali_9 = objRs("caratteristiche_generali_9")
caratteristiche_generali_10 = objRs("caratteristiche_generali_10")
caratteristiche_tecniche_1 = objRs("caratteristiche_tecniche_1")
caratteristiche_tecniche_2 = objRs("caratteristiche_tecniche_2")
caratteristiche_tecniche_3 = objRs("caratteristiche_tecniche_3")
caratteristiche_tecniche_4 = objRs("caratteristiche_tecniche_4")
caratteristiche_tecniche_5 = objRs("caratteristiche_tecniche_5")
caratteristiche_tecniche_6 = objRs("caratteristiche_tecniche_6")
caratteristiche_tecniche_7 = objRs("caratteristiche_tecniche_7")
caratteristiche_tecniche_8 = objRs("caratteristiche_tecniche_8")
caratteristiche_tecniche_9 = objRs("caratteristiche_tecniche_9")
caratteristiche_tecniche_10 = objRs("caratteristiche_tecniche_10")
caratteristiche_tecniche_11 = objRs("caratteristiche_tecniche_11")
caratteristiche_tecniche_12 = objRs("caratteristiche_tecniche_12")
caratteristiche_tecniche_13 = objRs("caratteristiche_tecniche_13")
caratteristiche_tecniche_14 = objRs("caratteristiche_tecniche_14")
caratteristiche_tecniche_15 = objRs("caratteristiche_tecniche_15")
caratteristiche_tecniche_16 = objRs("caratteristiche_tecniche_16")
caratteristiche_tecniche_17 = objRs("caratteristiche_tecniche_17")
caratteristiche_tecniche_18 = objRs("caratteristiche_tecniche_18")
caratteristiche_tecniche_19 = objRs("caratteristiche_tecniche_19")
caratteristiche_tecniche_20 = objRs("caratteristiche_tecniche_20")
corsi_1 = objRs("corsi_1")
corsi_2 = objRs("corsi_2")
corsi_3 = objRs("corsi_3")
corsi_4 = objRs("corsi_4")
corsi_5 = objRs("corsi_5")
corsi_6 = objRs("corsi_6")
corsi_7 = objRs("corsi_7")
corsi_8 = objRs("corsi_8")
corsi_9 = objRs("corsi_9")
corsi_10 = objRs("corsi_10")
datasheet = objRs("datasheet")
manuale_1 = objRs("manuale_1")
manuale_2 = objRs("manuale_2")
manuale_3 = objRs("manuale_3")
note_applicative_1 = objRs("note_applicative_1")
note_applicative_2 = objRs("note_applicative_2")
note_applicative_3 = objRs("note_applicative_3")
note_applicative_4 = objRs("note_applicative_4")
note_applicative_5 = objRs("note_applicative_5")
foto1 = objRs("foto1")
foto2 = objRs("foto2")
foto3 = objRs("foto3")
foto4 = objRs("foto4")
foto5 = objRs("foto5")
foto6 = objRs("foto6")
cb_elettrico = objRs("cb_elettrico")
cb_magnetico = objRs("cb_magnetico")
cb_elettromagnetico = objRs("cb_elettromagnetico")
cb_tarature = objRs("cb_tarature")
cb_riparazioni = objRs("cb_riparazioni")
cb_garanzia = objRs("cb_garanzia")
data_inserimento = objRs("data_inserimento")
cb_accessori = objRs("cb_accessori")
cb_opzioni = objRs("cb_opzioni")
CodiceArticolo = objRs("CodiceArticolo")
CodiceCampoApp = objRs("CodiceCampoApp")
cb_LaboratorioGrandezzeElettriche = objRs("cb_LaboratorioGrandezzeElettriche")
cb_LaboratorioGrandezzeMeccaniche = objRs("cb_LaboratorioGrandezzeMeccaniche")
cb_MisureEMIEMC = objRs("cb_MisureEMIEMC")
cb_UfficioAcquisti = objRs("cb_UfficioAcquisti")
cb_ResponsabileQualita = objRs("cb_ResponsabileQualita")
cb_FisicaSanitaria = objRs("cb_FisicaSanitaria")
cb_PIMImpiantiIndustrialiElettromeccanici = objRs("cb_PIMImpiantiIndustrialiElettromeccanici")
cb_MisureAmbientiDiLavoroCEM = objRs("cb_MisureAmbientiDiLavoroCEM")
cb_MisureAmbientiDiLavoroRumoreVibrazioni = objRs("cb_MisureAmbientiDiLavoroRumoreVibrazioni")
cb_MisureAmbientaliCEMBF = objRs("cb_MisureAmbientaliCEMBF")
cb_MisureAmbientaliCEMRF = objRs("cb_MisureAmbientaliCEMRF")
cb_MisureAmbientaliQualitaAria = objRs("cb_MisureAmbientaliQualitaAria")
cb_MisureAmbientiDiLavoroRadiazioniOttiche = objRs("cb_MisureAmbientiDiLavoroRadiazioniOttiche")
Prezzo = objRs("Prezzo")
cb_valuta = objRs("cb_valuta")
cb_presente_web = objRs("cb_presente_web")
'------------------- SISTEMAZIONE DEI DOPPI APICI ---------------------------
categoria_principale = Replace (categoria_principale , "__", """" )
categoria_secondaria = Replace (categoria_secondaria , "__", """" )
marca = Replace (marca , "__", """" )
nome_modello = Replace (nome_modello , "__", """" )
serie = Replace (serie , "__", """" )
'codice_pt = Replace (codice_pt , "__", """" )
descrizione = Replace (descrizione , "__", """" )
descrizione = Replace( descrizione , "&" , "&" )
descrizione = Replace( descrizione , "<" , "<" )
if (isNull(FAQ)) Then
FAQ = ""
End If
FAQ = Replace( FAQ , "&" , "&" )
FAQ = Replace( FAQ , "<" , "<" )
codiceTrue = Replace( codiceTrue , "&" , "&" )
marca = Replace( marca , "&" , "&" )
nome_modello = Replace( nome_modello , "&" , "&" )
caratteristiche_generali_1 = Replace (caratteristiche_generali_1 , "__", """" )
caratteristiche_generali_2 = Replace (caratteristiche_generali_2 , "__", """" )
caratteristiche_generali_3 = Replace (caratteristiche_generali_3 , "__", """" )
caratteristiche_generali_4 = Replace (caratteristiche_generali_4 , "__", """" )
caratteristiche_generali_5 = Replace (caratteristiche_generali_5 , "__", """" )
caratteristiche_generali_6 = Replace (caratteristiche_generali_6 , "__", """" )
caratteristiche_generali_7 = Replace (caratteristiche_generali_7 , "__", """" )
caratteristiche_generali_8 = Replace (caratteristiche_generali_8 , "__", """" )
caratteristiche_generali_9 = Replace (caratteristiche_generali_9 , "__", """" )
caratteristiche_generali_10 = Replace (caratteristiche_generali_10 , "__", """" )
'caratteristiche_generali_1 = Replace (caratteristiche_generali_1 , "&" , "&" )
'caratteristiche_generali_2 = Replace (caratteristiche_generali_2 , "&" , "&" )
'caratteristiche_generali_3 = Replace (caratteristiche_generali_3 , "&" , "&" )
'caratteristiche_generali_4 = Replace (caratteristiche_generali_4 , "&" , "&" )
'caratteristiche_generali_5 = Replace (caratteristiche_generali_5 , "&" , "&" )
'caratteristiche_generali_6 = Replace (caratteristiche_generali_6 , "&" , "&" )
'caratteristiche_generali_7 = Replace (caratteristiche_generali_7 , "&" , "&" )
'caratteristiche_generali_8 = Replace (caratteristiche_generali_8 , "&" , "&" )
'caratteristiche_generali_9 = Replace (caratteristiche_generali_9 , "&" , "&" )
'caratteristiche_generali_10 = Replace (caratteristiche_generali_10 , "&" , "&" )
caratteristiche_generali_1 = Replace (caratteristiche_generali_1 , "<" , "<" )
caratteristiche_generali_2 = Replace (caratteristiche_generali_2 , "<" , "<" )
caratteristiche_generali_3 = Replace (caratteristiche_generali_3 , "<" , "<" )
caratteristiche_generali_4 = Replace (caratteristiche_generali_4 , "<" , "<" )
caratteristiche_generali_5 = Replace (caratteristiche_generali_5 , "<" , "<" )
caratteristiche_generali_6 = Replace (caratteristiche_generali_6 , "<" , "<" )
caratteristiche_generali_7 = Replace (caratteristiche_generali_7 , "<" , "<" )
caratteristiche_generali_8 = Replace (caratteristiche_generali_8 , "<" , "<" )
caratteristiche_generali_9 = Replace (caratteristiche_generali_9 , "<" , "<" )
caratteristiche_generali_10 = Replace (caratteristiche_generali_10 , "<" , "<" )
caratteristiche_tecniche_1 = Replace (caratteristiche_tecniche_1 , "__", """" )
caratteristiche_tecniche_2 = Replace (caratteristiche_tecniche_2 , "__", """" )
caratteristiche_tecniche_3 = Replace (caratteristiche_tecniche_3 , "__", """" )
caratteristiche_tecniche_4 = Replace (caratteristiche_tecniche_4 , "__", """" )
caratteristiche_tecniche_5 = Replace (caratteristiche_tecniche_5 , "__", """" )
caratteristiche_tecniche_6 = Replace (caratteristiche_tecniche_6 , "__", """" )
caratteristiche_tecniche_7 = Replace (caratteristiche_tecniche_7 , "__", """" )
caratteristiche_tecniche_8 = Replace (caratteristiche_tecniche_8 , "__", """" )
caratteristiche_tecniche_9 = Replace (caratteristiche_tecniche_9 , "__", """" )
caratteristiche_tecniche_10 = Replace (caratteristiche_tecniche_10 , "__", """" )
caratteristiche_tecniche_11 = Replace (caratteristiche_tecniche_11 , "__", """" )
caratteristiche_tecniche_12 = Replace (caratteristiche_tecniche_12 , "__", """" )
caratteristiche_tecniche_13 = Replace (caratteristiche_tecniche_13 , "__", """" )
caratteristiche_tecniche_14 = Replace (caratteristiche_tecniche_14 , "__", """" )
caratteristiche_tecniche_15 = Replace (caratteristiche_tecniche_15 , "__", """" )
caratteristiche_tecniche_16 = Replace (caratteristiche_tecniche_16 , "__", """" )
caratteristiche_tecniche_17 = Replace (caratteristiche_tecniche_17 , "__", """" )
caratteristiche_tecniche_18 = Replace (caratteristiche_tecniche_18 , "__", """" )
caratteristiche_tecniche_19 = Replace (caratteristiche_tecniche_19 , "__", """" )
caratteristiche_tecniche_20 = Replace (caratteristiche_tecniche_20 , "__", """" )
'caratteristiche_tecniche_1 = Replace (caratteristiche_tecniche_1 , "&" , "&" )
'caratteristiche_tecniche_2 = Replace (caratteristiche_tecniche_2 , "&" , "&" )
'caratteristiche_tecniche_3 = Replace (caratteristiche_tecniche_3 , "&" , "&" )
'caratteristiche_tecniche_4 = Replace (caratteristiche_tecniche_4 , "&" , "&" )
'caratteristiche_tecniche_5 = Replace (caratteristiche_tecniche_5 , "&" , "&" )
'caratteristiche_tecniche_6 = Replace (caratteristiche_tecniche_6 , "&" , "&" )
'caratteristiche_tecniche_7 = Replace (caratteristiche_tecniche_7 , "&" , "&" )
'caratteristiche_tecniche_8 = Replace (caratteristiche_tecniche_8 , "&" , "&" )
'caratteristiche_tecniche_9 = Replace (caratteristiche_tecniche_9 , "&" , "&" )
'caratteristiche_tecniche_10 = Replace (caratteristiche_tecniche_10 , "&" , "&" )
'caratteristiche_tecniche_11 = Replace (caratteristiche_tecniche_11 , "&" , "&" )
'caratteristiche_tecniche_12 = Replace (caratteristiche_tecniche_12 , "&" , "&" )
'caratteristiche_tecniche_13 = Replace (caratteristiche_tecniche_13 , "&" , "&" )
'caratteristiche_tecniche_14 = Replace (caratteristiche_tecniche_14 , "&" , "&" )
'caratteristiche_tecniche_15 = Replace (caratteristiche_tecniche_15 , "&" , "&" )
'caratteristiche_tecniche_16 = Replace (caratteristiche_tecniche_16 , "&" , "&" )
'caratteristiche_tecniche_17 = Replace (caratteristiche_tecniche_17 , "&" , "&" )
'caratteristiche_tecniche_18 = Replace (caratteristiche_tecniche_18 , "&" , "&" )
'caratteristiche_tecniche_19 = Replace (caratteristiche_tecniche_19 , "&" , "&" )
'caratteristiche_tecniche_20 = Replace (caratteristiche_tecniche_20 , "&" , "&" )
caratteristiche_tecniche_1 = Replace (caratteristiche_tecniche_1 , "<" , "<" )
caratteristiche_tecniche_2 = Replace (caratteristiche_tecniche_2 , "<" , "<" )
caratteristiche_tecniche_3 = Replace (caratteristiche_tecniche_3 , "<" , "<" )
caratteristiche_tecniche_4 = Replace (caratteristiche_tecniche_4 , "<" , "<" )
caratteristiche_tecniche_5 = Replace (caratteristiche_tecniche_5 , "<" , "<" )
caratteristiche_tecniche_6 = Replace (caratteristiche_tecniche_6 , "<" , "<" )
caratteristiche_tecniche_7 = Replace (caratteristiche_tecniche_7 , "<" , "<" )
caratteristiche_tecniche_8 = Replace (caratteristiche_tecniche_8 , "<" , "<" )
caratteristiche_tecniche_9 = Replace (caratteristiche_tecniche_9 , "<" , "<" )
caratteristiche_tecniche_10 = Replace (caratteristiche_tecniche_10 , "<" , "<" )
caratteristiche_tecniche_11 = Replace (caratteristiche_tecniche_11 , "<" , "<" )
caratteristiche_tecniche_12 = Replace (caratteristiche_tecniche_12 , "<" , "<" )
caratteristiche_tecniche_13 = Replace (caratteristiche_tecniche_13 , "<" , "<" )
caratteristiche_tecniche_14 = Replace (caratteristiche_tecniche_14 , "<" , "<" )
caratteristiche_tecniche_15 = Replace (caratteristiche_tecniche_15 , "<" , "<" )
caratteristiche_tecniche_16 = Replace (caratteristiche_tecniche_16 , "<" , "<" )
caratteristiche_tecniche_17 = Replace (caratteristiche_tecniche_17 , "<" , "<" )
caratteristiche_tecniche_18 = Replace (caratteristiche_tecniche_18 , "<" , "<" )
caratteristiche_tecniche_19 = Replace (caratteristiche_tecniche_19 , "<" , "<" )
caratteristiche_tecniche_20 = Replace (caratteristiche_tecniche_20 , "<" , "<" )
corsi_1 = Replace (corsi_1 , "__", """" )
corsi_2 = Replace (corsi_2 , "__", """" )
corsi_3 = Replace (corsi_3 , "__", """" )
corsi_4 = Replace (corsi_4 , "__", """" )
corsi_5 = Replace (corsi_5 , "__", """" )
corsi_6 = Replace (corsi_6 , "__", """" )
corsi_7 = Replace (corsi_7 , "__", """" )
corsi_8 = Replace (corsi_8 , "__", """" )
corsi_9 = Replace (corsi_9 , "__", """" )
corsi_10 = Replace (corsi_10 , "__", """" )
datasheet = Replace (datasheet , "__", """" )
foto1 = Replace (foto1 , "__", """" )
foto2 = Replace (foto2 , "__", """" )
foto3 = Replace (foto3 , "__", """" )
foto4 = Replace (foto4 , "__", """" )
foto5 = Replace (foto5 , "__", """" )
foto6 = Replace (foto6 , "__", """" )
'cb_elettrico = Replace (cb_elettrico , "__", """" )
'cb_magnetico = Replace (cb_magnetico , "__", """" )
'cb_elettromagnetico = Replace (cb_elettromagnetico , "__", """" )
data_inserimento = Replace (data_inserimento , "__", """" )
'cb_accessori = Replace (cb_accessori , "__", """" )
'cb_opzioni = Replace (cb_opzioni , "__", """" )
objRs.Movenext
Loop
' ----------------------------------------------------------------------------------
' -- INIZIO STAMPA TABELLA RELATIVA AI PRODOTTI --
' ----------------------------------------------------------------------------------
descrizione_2 = descrizione
descrizione_2 = Replace (descrizione_2 , """", "'" )
%>
ecco l'errore
Microsoft JET Database Engine error '80040e14' Errore di sintassi (operatore mancante) nell'espressione della query 'dboStrumentiStrumenti_mia.ID_Strumento1 ='. /uk/product.asp, riga 1213
il problema è che solo per alcuni id mi risponde errore per altri id funziona perfettamente.
ho verificato il corretto inserimento dei prodotti che mi danno errore e non c'è nessuna diversità rispetto agli altri. Il problema è che da una certa data in avanti non mi richiama correttamente il prodotto perchè non riconosce proprio l'id quindi dio conseguenza tutti i campi associati.
come mi consigli di procedere?
grazie mille