Erro De Banco De Dados No Servidor Asp

DELPHI-Man32 · Janeiro 5, 2005

OLÁ PESSOAL DO ASP

A POUCO TEMPO ENCONTREI UM SERVIDOR GRATIS PARA PAGINAS ASP, MAS ESTOU COM UM PROBLEMA, NO SERVIDOR DA MINHA MÁQUINA FUNCIONA TUDO MUITO BEM, MAS QUANDO TRANFIRO OS DADOS PARA O ROOT DO SERVIDOR NADA FUNCINA, já FIZ ALGUNS TESTES SIMPLES COM ASP E FUNCIONOU MAIS ESTA DANDO UM ERRO QUE não SEI O QUE É vocês PODEM ME AJUDAR?

O SERVIDOR É

SERVIDOR ASP GRATIS

AH!! ESTÁ DANDO O MESMO ERRO EM OUTRO SERVIDOR

O 7host.com

O SITE É:

ASP COM ERRO!!!

OSJunior · Janeiro 5, 2005

Delphi-Man32, passe o código para nós.

Destaque a linha 54.

Microsoft OLE DB Provider for ODBC Drivers error '80004005' 
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x718 Thread 0x1034 DBC 0xa82b8fc Jet'. 

/jacunda/scripts/guest/guest.asp, line 54

Grato.

resopi · Janeiro 5, 2005

verifique o caminho para o banco de dados possivelmente estara errado

t+

DELPHI-Man32 · Janeiro 8, 2005

ok amigos, vamos supor que eu crie uma pasta no root do dominio

ficaria assim

/root/script/guest.asp -> o arquivo asp

/root/script/guest.mdb -> o banco de dados

estao no mesmo diretorio

o url do site é

n.domaindlx.com/jacunda

como ficaria o endereço do banco na linha que faz a conexão?

vicoluis · Janeiro 8, 2005

ficaria so o nome do banco, se eles estão na mesma pasta...

<%
set DB = createobject("adodb.connection")
constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.Mappath("guest.mdb")
DB.open constr
Set objRS = Server.CreateObject("ADODB.Recordset")
%>

DELPHI-Man32 · Janeiro 8, 2005

ok amigo, vou testar estou usando já em outro servidor se der certo vou colocar no mesmo servidor

DELPHI-Man32 · Janeiro 8, 2005

ok o primeiro problema problema foi resolvido, mas agora estou com outro, editei as linhas que assina no livro mas ocorre outro erro!!

vejam em:

VEJAM AQUI

VAGNER FRANCO

vicoluis · Janeiro 8, 2005

Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'key'
/jacunda/guest.asp, line 46

quem ser a linha 46?

DELPHI-Man32 · Janeiro 8, 2005

esta aparecendo este erro na linha 46 no arquivo asp, que esta vinculado ao link que assina o livro

se alguém puder me ajudar

VAGNER

vicoluis · Janeiro 8, 2005

esta aparecendo este erro na linha 46 no arquivo asp, que esta vinculado ao link que assina o livro
se alguém puder me ajudar
VAGNER

uai... mas como eu vou saber o conteudo desta linha para te ajudar???

posta ai esta linha... e umas 5 antes, e umas 5 depois.. e especifica quem é a linha 46... sem ver a linha, é humanamente impossivel... de te ajudar...

DELPHI-Man32 · Janeiro 8, 2005

<%

dim strProvider ' string used to identify database

dim objConn ' holds ADODB.Connection object

dim dataRec ' holds ADODB.RecordSet object

PageType = "d"

if request.queryString.count > 0 then

for n = 1 to request.queryString.count

if lcase(request.queryString(n).key) = "p" then

PageType = lcase(request.queryString(n).value)

end if

strProvider="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & DatabaseSource

set objConn = server.createObject("ADODB.Connection")

objConn.Open strProvider

set dataRec = server.createObject("ADODB.RecordSet")

dataRec.CursorType = 1 ' KeySet

dataRec.LockType = 3 ' optimistic

dataRec.Open TableName, objConn, , , &H0002 ' open table

dataRec.MoveFirst

select case PageType

case "d"

%>

<tr>

<tr>

<td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Use the guestbook to leave messages on this site. Any messages you leave will be public and can be read by anyone.</font></td>

<td nowrap><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="http://www.libihost.net/jacunda/guest.asp?p=s">Sign

Guestbook</a> | <a href="http://www.libihost.net/jacunda/guest.asp">Leave Guestbook</a></font></td>

</tr>

</table>

</td>

</tr>

<tr>

--------------------------------------------------------------

se isso ajudar!!!!

vicoluis · Janeiro 8, 2005

<%
dim strProvider ' string used to identify database
dim objConn ' holds ADODB.Connection object
dim dataRec ' holds ADODB.RecordSet object
PageType = "d"
if request.queryString.count > 0 then
for n = 1 to request.queryString.count
if lcase(request.queryString(n).key) = "p" then
PageType = lcase(request.queryString(n).value)
end if
next
end if
strProvider="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & DatabaseSource
set objConn = server.createObject("ADODB.Connection")
objConn.Open strProvider
set dataRec = server.createObject("ADODB.RecordSet")
dataRec.CursorType = 1 ' KeySet
dataRec.LockType = 3 ' optimistic
dataRec.Open TableName, objConn, , , &H0002 ' open table
dataRec.MoveFirst
select case PageType
case "d"
%>
<tr>
<td colspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Use the guestbook to leave messages on this site. Any messages you leave will be public and can be read by anyone.</font></td>
<td nowrap><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="http://www.libihost.net/jacunda/guest.asp?p=s">Sign
Guestbook</a> | <a href="http://www.libihost.net/jacunda/guest.asp">Leave Guestbook</a></font></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#000000">
<td width="30%">
<table width="100%" border="0" cellspacing="0" cellpadding="2" bgcolor="#000033">
<tr>
--------------------------------------------------------------
se isso ajudar!!!!

cara, nem 46 linhas tem neste codigo que você me passou...

abre o arquivo guest.asp e me diz o que ta na linha 46... so isso...

DELPHI-Man32 · Janeiro 8, 2005

ok, entenda, esto me aventurando no asp sou iniciante nesta linguagem, pelo meu nick você já percebe em qual liguagem eu programo

vou te mandar ok!

VAGNER

vicoluis · Janeiro 9, 2005

Mas no delhpi num conta linhas no codigo?

bem, vamos la... sua linha 46 é esta

if lcase(request.queryString(n).key) = "p" then

eles, ou vc... não sei quem fez o codigo, estão usando propriedades de querystring, q eu desconheco... como

.Key

a mensagem de erro, diz que o methodo, querystring, não da suporte a .Key

entaum... tente tirar desta linha o .Key e de todas as outras que possuem este atributo... e veja no que da... ficando assim:

if lcase(request.queryString(n)) = "p" then

DELPHI-Man32 · Janeiro 9, 2005

no delphi realmente conta as linhas do codigo, mas enteda se você conhece o delphi sabe que a estrutura de programação e difirente, e pouco conheço sobre VBScript

você foi muito atencioso com meu problema se eu puder te ajudar em alguma coisa e so falar!!! vou testar o que me falou e deposi posto o resultado!!!

abraços, VAGNER

DELPHI-Man32 · Janeiro 9, 2005

kro amigo vicoluis, fiz exatamente aquilo que você sugeriu mas agora não dá o erro mas também não vai pra lugar algum!!!

processa e pára!

veja o link

LIVRO DE VISITAS

vicoluis · Janeiro 9, 2005

bem.. vamos mais uma vez.. hehe

tinha ficado assim ne

if lcase(request.queryString(n)) = "p" then

vamos trocar por

if request.queryString("p") = "p" then

o q você tem q mudar é o q esta em vermelho... vamos ver se desta vez vai...

DELPHI-Man32 · Janeiro 9, 2005

cara acho q não tem jeito, pois no meu servidor interno funciona tudo beleza mas aqui não funciona!!

valeu pela ajuda!

Entrar

Erro De Banco De Dados No Servidor Asp

Pergunta

Link para o comentário

Compartilhar em outros sites

17 respostass a esta questão

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns