Guest -=OuTkAsT=- Postado Fevereiro 13, 2004 Denunciar Share Postado Fevereiro 13, 2004 ae galera eu sou novo no forum e no asp hehetipo eu qria saber o q ta errado neste script ta dando esse erro"Erro de compilação do Microsoft VBScript erro '800a0409' Constante de seqüência não finalizada /sites/site/top.asp, line 8 MM_connDmx2_STRING = "Driver={Microsoft Access Driver (*.mdb)};------------------------------------------------------------------------------------^"olhem o codigo--<html><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><%Dim MM_connDmx2_STRINGMM_connDmx2_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("cs.mdb")sql = "SELECT TOP 10 * FROM mapas order by cliques desc"set rs = conexao.execute(sql)while not rs.eofresponse.write "<font face=tahoma color=black " & rs("nome") & " <a href="& rs("url") &"> <br>"rs.movenextwendset rs=nothing%><body></body></html> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 jf_rodrigues Postado Fevereiro 13, 2004 Denunciar Share Postado Fevereiro 13, 2004 Cara, tenta usar<% Set Conn = Server.CreateObject("adodb.connection") Conn.Open "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & Server.MapPath("cs.mdb") %> no lugar de <% Dim MM_connDmx2_STRING MM_connDmx2_STRING = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("cs.mdb")Se você estiver usando Access 2000.Deve resolver!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 jf_rodrigues Postado Fevereiro 13, 2004 Denunciar Share Postado Fevereiro 13, 2004 Ahhh... tava esquecendo...no lugar de "set rs = conexao.execute(sql)" você usaset rs = conn.execute(sql)Abraços! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 macks Postado Fevereiro 15, 2004 Denunciar Share Postado Fevereiro 15, 2004 cara tenta usar assim varialveldeconexao.open "provider=msdasql;" & "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("bancodedados.mdb") cara tenta usar assim e ver se dar certo cara beleza falou t++++++++++ Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest -=OuTkAsT=-
ae galera eu sou novo no forum e no asp hehe
tipo eu qria saber o q ta errado neste script
ta dando esse erro
"Erro de compilação do Microsoft VBScript erro '800a0409'
Constante de seqüência não finalizada
/sites/site/top.asp, line 8
MM_connDmx2_STRING = "Driver={Microsoft Access Driver (*.mdb)};
------------------------------------------------------------------------------------^"
olhem o codigo
--
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<%
Dim MM_connDmx2_STRING
MM_connDmx2_STRING = "Driver={Microsoft Access Driver (*.mdb)};
DBQ=" & Server.MapPath("cs.mdb")
sql = "SELECT TOP 10 * FROM mapas order by cliques desc"
set rs = conexao.execute(sql)
while not rs.eof
response.write "<font face=tahoma color=black " & rs("nome") & " <a href="& rs("url") &"> <br>"
rs.movenext
wend
set rs=nothing
%>
<body>
</body>
</html>
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.