Ver Mensaje Individual
  #6 (permalink)  
Antiguo 23/10/2006, 15:58
Pilly
 
Fecha de Ingreso: octubre-2005
Mensajes: 85
Antigüedad: 19 años, 6 meses
Puntos: 0
Sabes que no funciona y no hay nada de especial en la bdd, todos los campos son texto, ahora no me sale ningún error pero no graba nada,
este es el código. Dónde puede estar mal!!!
Código:
sql = "INSERT INTO fastsell ("
				sql = sql & "marca, "
				sql = sql & "modelo, "
				sql = sql & "precio, "
				sql = sql & "recorrido, "
				sql = sql & "color, "
				sql = sql & "anio, "
				sql = sql & "a_gasolina, "
				sql = sql & "a_diesel, "
				sql = sql & "cilindraje, "
				sql = sql & "cant_cilindro, "
				sql = sql & "automatico, "
				sql = sql & "manual, "
				sql = sql & "tiptronic, "
				sql = sql & "traccion4x2, "
				sql = sql & "traccion4x4, "
				sql = sql & "alarma, "
				sql = sql & "alarma_sat, "
				sql = sql & "bloqueo_cent, "
				sql = sql & "candados_aut, "
				sql = sql & "aire_acond, "
				sql = sql & "climatizador, "
				sql = sql & "aros_mag, "
				sql = sql & "vid_esp_elect, "
				sql = sql & "halogeno, "
				sql = sql & "xenon, "
				sql = sql & "neblineros, "
				sql = sql & "tapizado_cuero, "
				sql = sql & "techo_corr, "
				sql = sql & "dir_hidr, "
				sql = sql & "asientos_elec, "
				sql = sql & "panel_comp, "
				sql = sql & "cruise_control, "
				sql = sql & "airbag, "
				sql = sql & "abss, "
				sql = sql & "esp, "
				sql = sql & "bas, "
				sql = sql & "otro_sist_seg, "
				sql = sql & "radio, "
				sql = sql & "cdplayer, "
				sql = sql & "dvd, "
				sql = sql & "tv, "
				sql = sql & "tuning, "
				sql = sql & "spoiler, "
				sql = sql & "aleron, "
				sql = sql & "volante_dep, "
				sql = sql & "estribos, "
				sql = sql & "otro_tuning, "
				sql = sql & "contado, "
				sql = sql & "financiamiento, "
				sql = sql & "num_foto"
				sql = sql & ") VALUES ("
				sql = sql  & "'"  & marca & "','"  
				sql = sql & modelo & "','"  
				sql = sql & precio & "','"  
				sql = sql & recorrido & "','"  
				sql = sql & color & "','"  
				sql = sql & anio & "','"  
				sql = sql & a_gasolina & "','"  
				sql = sql & a_diesel & "','"  
				sql = sql & cilindraje & "','"  
				sql = sql & cant_cilindro & "','"  
				sql = sql & automatico & "','"  
				sql = sql & manual & "','"  
				sql = sql & tiptronic & "','"  
				sql = sql & traccion4x2 & "','"  
				sql = sql & traccion4x4 & "','"  
				sql = sql & alarma & "','" 
				sql = sql & alarma_sat & "','" 
				sql = sql & bloqueo_cent & "','"  
				sql = sql & candados_aut & "','"  
				sql = sql & aire_acond & "','"  
				sql = sql & climatizador & "','"  
				sql = sql & aros_mag & "','" 
				sql = sql & vid_esp_elect & "','" 
				sql = sql & halogeno & "','" 
				sql = sql & xenon & "','"  
				sql = sql & neblineros & "','"  
				sql = sql & tapizado_cuero & "','"  
				sql = sql & techo_corr & "','"  
				sql = sql & dir_hidr & "','" 
				sql = sql & asientos_elec & "','" 
				sql = sql & panel_comp & "','" 
				sql = sql & cruise_control & "','" 
				sql = sql & airbag & "','" 
				sql = sql & abss & "','" 
				sql = sql & esp & "','"  
				sql = sql & bas & "','" 
				sql = sql & otro_sist_seg & "','" 
				sql = sql & radio& "','"  
				sql = sql & cdplayer & "','" 
				sql = sql & dvd & "','"  
				sql = sql & tv & "','"  
				sql = sql & tuning & "','" 
				sql = sql & spoiler & "','" 
				sql = sql & aleron & "','" 
				sql = sql & volante_dep & "','"  
				sql = sql & estribos & "','" 
				sql = sql & otro_tuning & "','" 
				sql = sql & contado & "','" 
				sql = sql & financiamiento & "','" 
				sql = sql & num_foto& "')"
				Conn.Execute(sql)