Error de compilación de Microsoft VBScript error '800a0400'
Se esperaba una instrucción
/unitec/papeleria/pagina2.asp, line 40
</head>
^
<html>
<head>
<title>Coordinación de Asesores del C. Gobernador </title>
<%
Dim oConn,strSQL,objRS,objRS2,strSQL2,strSQL3,strSQL4
Set oConn = Server.CreateObject("ADODB.Connection")
set recordset1 = Server.CreateObject("ADODB.RecordSet")
oConn.Open "papeleria2"
login = request.form("usuario")
password = request.form("clave")
SQL="SELECT * FROM usuario WHERE Login='"&login&"' AND contrasena='"&password&"'"
set rs=oConn.Execute(SQL)
coordinacion = rs.fields("id_coordinacion")
SQL2="SELECT * FROM coordinacion WHERE id_coordinacion = '"&coordinacion&"'"
set rs2=oConn.Execute(SQL2)
strSQL4 = "INSERT INTO PREVIO_PEDIDO(id_usuario, id_coordinacion,fecha)"
strSQL4 = strSQL4&" select Usuario.id_usuario, coordinacion.id_coordinacion, '"&Request.Form("fecha")&&q uot;'"
strSQL4 = strSQL4&" from usuario, coordinacion where usuario.usuario ='"& Request.Form("nombre")&"'"
strSQL4 = strSQL4&" and coordinacion.coordinacion ='"& request.Form("dependencia")&"'& quot;
recordset1.open strsql4,oConn
%>
</head>