Frases aleatorias

[Mário Monteiro 179]

bem cara como seu erro persiste ainda tive a curiosidade de baixar o codigo e como disse anteriormente varios arquivos usam a funçãoopen_recordsetall.aspindex.asplogin_verif.aspnew_quote.aspquote_manager.aspem qual destas esta acontecendo o erro??

[exercito 0]

Olha... tá assim...quando entro na index.asp... beleza... mostra tudo, porém qd entro no login.asp é pedido a senha e o login... ok... coloco e dou OK..pronto a partir daí o erro aparece e não acesso a página de administração...

[Mário Monteiro 179]

posta o erro certinho ai, que não tou testando o codigo, so estou olhando pra ele...

[exercito 0]

Preenchi a senha e login e vai pra essa página:

http://xxx.xxxx.com.br/frases/login_verif.asp

 

Daí aparece essa msg:

 

Microsoft JET Database Engine error '80040e14'

 

Syntax error in FROM clause.

 

/frases/function.asp, line 18

[Mário Monteiro 179]

cara o caso é grave... digna de UTI, ehehehcomeça a apelar....manda escrever os parametros da função antes de abrir...aqui, não esquece de tirar aquela linha de sql que pediram pra você colocarsql = SELECT * FROM frasesno mais a parada fica assimsub open_recordset(recordset, sql)Set recordset = Server.CreateObject("ADODB.Recordset")response.write sqlrecordset.Open sql, conn, 1, 1end subposta aqui o que apresentar na tela, PS: isto não vai resolver nada ainda...

[exercito 0]

Deu isso agora qd faço o login e dou "OK":

 

 

select * from user where login = 'admin' and password = 'admin'

Microsoft JET Database Engine error '80040e14'

 

Syntax error in FROM clause.

 

/frases/function.asp, line 19

[Mário Monteiro 179]

cara não sei se tem alguma palavra reservada ai pois aparentemente não tem erro, testa este user ai....

[exercito 0]

essa tabela tá em texto... será que tenho que mudá-la?

[Mário Monteiro 179]

cara não sei se é isso, mas tentar mudar o nome da tabela

[exercito 0]

Sério? tá de sacanagem... então fiz besteira... devo ter errado...Tá ssim o caminho (código original):Set conn = Server.CreateObject("ADODB.Connection")if instr(Request.ServerVariables("PATH_TRANSLATED"),"frases") then strMyConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("fraes.mdb")&""else strMyConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("dados/frases.mdb")&""end ifAí eu mudei e coloquei isso:Set conn = Server.CreateObject("ADODB.Connection") strMyConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\home\xxxxxxx\dados\frases.mdb;"Para deixar daquele jeito eu deixaria como então?

[abcd_man 0]

Tens só que dá o caminho do teu banco de dados no dbqDBQ="&Server.MapPath("Põe o caminho do banco aqui")&""

[exercito 0]

Parabéns... fumegou.... agora tá funcionado... engraçado... alterei aquele tipo de conexão para oque uso em meu site e tava dando erro... agora tá 10.Agradeço a todos que me ajudaram. Muito obrigado

[lucastroy 0]

Gente, q trabalho em... tantas respostas para isso...isso só me faz ter certeza de uma coisa, eu sempre vou fazer meu próprio código viu... fica bem melhor e bem do jeito que eu quero...

[exercito 0]

Essa é a finalidade do Fórum, um ajuda o outro.