Ver Mensaje Individual
  #1 (permalink)  
Antiguo 29/01/2010, 09:02
Avatar de focesar
focesar
 
Fecha de Ingreso: abril-2005
Mensajes: 84
Antigüedad: 20 años
Puntos: 0
Insercion de campo

Hola a todos..
estoy tratando de hacer una insercion de un campo con ADODB en una base de access 97-2003 pero al pasarle el dato me da este error:

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01B6)
El objeto no acepta esta propiedad o método: 'execute'
/bandaancha/html/asig_tecn_form.asp, línea 59

el codigo va asi:

Código:
	strConnection = "DRIVER={Microsoft Access Driver (*.mdb)};" & _
	"Dbq=" & Server.MapPath(".\..\database\enrute.mdb") 
	
	Set conn = Server.CreateObject("ADODB.Connection")
	conn.Open strConnection

	Set rs = Server.CreateObject("ADODB.recordset")

	if tel0 = "" then
		response.redirect("asig_tecn.asp")
	elseif tel1="" then
		dim consul_SQL, insert_SQL
		consul_SQL="Select id_reg from enrute where num_tel='"& tel0 &"' and fech_ejec is null"
		rs.open consul_SQL, conn, 3,3
	
		if rs.eof then
			insert_SQL="Insert into enrute (num_tel, cod_tec, fech_asig, cod_mov) values ('"& tel0 &"', '"& tecn &"', date(), '"& mov0 &"')" 
			rs.execute insert_QL, conn, 3,3
			response.redirect("asig_tecn.asp?id=ok&ost=1")
		else
			response.redirect("asig_tecn.asp?id=no&num_tel=tel1")
		end if
__________________
El valor el hombre no es proporcional a las veces que ha triunfado, sino a las veces que se a levantado de los errores

:pensando: