Hola amigos fijense que estoy hacien una pequeña consulta de asp, pero me manda el siguiente error:
Tipo de error:
Error de compilación de Microsoft VBScript (0x800A0401)
Se esperaba un final de instrucción
/players.asp, line 23, column 12
rs.Open SQL Server, cn, 3, 3
La verdad no se ke sea a lo mejor es algo que no percibo espero me puedan ayudar aqui les dejo mi codigo:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Pagina nueva 1</title>
</head>
<body>
<p>
<%
openstr = "driver={Microsoft Access Driver (*.mdb)};" &_
"dbq="& Server.MapPath("critters.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open openstr
sql= "SELECT jersey, fname, sname, position " &_
" FROM roster " &_
"ORDER BY jersey; "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL Server, cn, 3, 3
On Error Resume Next
rs.MoveFirst
Do While Not rs.EOF
Response.Writte Server.HTMLEncode (_
rs.Fields("jersey") &","&_
rs.Fields("fanme") &","&_
rs.Fields("sname") &","&_
rs.Fields("position")) &"<br>," & vbCrLf
Loop
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
%>
</p>
</body>
</html>
Ya que mi base de datos solo tiene una tabla que se llama roster
