hola amigos del foro recurro a uds por que tengo un problema y es el sgte, resulta que estoy tratando de subir los datos que estan en una planilla excel a una tabla que esta en una base de datos en sql server pero me arroja un error de conexion y no se por que
el codigo es el sgte
<%
Path=Server.MapPath("mayoviajes_filtrado.xls")
Set ConexionBD = Server.CreateObject("ADODB.Connection")
ConexionBD.Open "DRIVER={Microsoft Excel DRIVER (*.xls)};DBQ=" & Path
Set rsVac = Server.CreateObject("ADODB.Recordset")
rsVac.Open "Select * From [HOJA1$] ", ConexionBD
Set ConexionDBSql = Server.CreateObject("ADODB.Connection")
ConexionDBSql.Open "DRIVER={SQL
Server};Server=CPUATH00646;Database=Prueba;UID=sa; PWD="atava6og"
Set sql = Server.CreateObject("ADODB.command")
sql.ActiveConnection = ConexionDBSql
rsVac.MoveFirst
Do While Not rsVac.EOF
sql.CommandText = "INSERT INTO Viaje VALUES ('" & Viaje_Tabla2_Nic & "','" &
Viaje_Fecha_Inicio & "','" & Viaje_Fecha_Final & "','"& Viaje_Pais_Destino "')"
sql.execute
rsVac.MoveNext
Loop
ConexionBD.Close
ConexionDBSql.Close
Set ConexionBD = Nothing
Set ConexionDBSql =Nothing
%>
el error que me tira es el sgte
Error de compilación de Microsoft VBScript (0x800A0409)
Constante de cadena sin terminar
y es en la sgte linea del codigo
ConexionDBSql.Open "DRIVER={SQL
Server};Server=CPUATH00646;Database=Prueba;UID=sa; PWD="atava6og"
mi servidor se llama CPUATH00646
mi base de datos Prueba y la tabla donde quiero insertar los datos se llama Viaje
y mi usuario es el sa y mi password es atava6og por favor ayudenme de antemano muchas gracias
