no ingresa y tampoco arroja error

[orharo2003]

Iniciado por cxbxvx

hola , hise lo que me dijiste de ejecutar el sqlstring , y me quedo de la siguiente forma , pero me arroja un error ,
el codigo quedo asi
<%
'Response.Buffer = true
dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("inventario.mdb")

'Recogemos los datos y validamos que no haya ningun campo vacio
dim rutproveedor,razonsocial,fono,correo
rutproveedor = Request.Form("rutproveedor")
razonsocial = Request.Form("razonsocial")
fono = Request.Form("fono")
correo = Request.Form("correo")

if rutproveedor = "" or razonsocial ="" or fono ="" or correo =""then
error = "Debe completar todos los datos."
Response.Write error
Response.End
Else
Sqlstring ="Insert Into proveedor (rut_proveedor,razon_social_proveedor,fono_proveed or,correo_electronico_proveedor) values('"&rutproveedor&"',"&razonsocial&",'"&fono& "','"&correo&"')"
cnn.Execute sqlString

'Terminamos e imprimimos un mensaje
Response.Write " "
end if
%>
el error que me arroja es el siguiente:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: 'Conexion'
/respuesta_ingreso_proveedor.asp, línea 31


intente varias cosa y no lo pude resolver que me dicen uds