Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Boa tarde galera.
To com um problemão.
segue o link abaixo:
http://www.pluguemais.com/mural/mura.asp
É o seguinte, eu já trabalhei com esse mesmo Mural de REcados diversas vezes e nunca deu esse erro. Se eu dou Permissão (imagens da permissão, me corrijam se estiver errado ok? - 1-/applications/core/interface/imageproxy/imageproxy.php?img=http://www.pluguemais.com/mural/Untitled%2520-%25201.jpg&key=d2c8ab294113b2b9292dc797e4b175d6a9fe70b64b5ee808ca9e5f0d2cc0dd76" alt="Imagem Postada" /> / 2-/applications/core/interface/imageproxy/imageproxy.php?img=http://www.pluguemais.com/mural/Untitled%2520-%25202.jpg&key=90e79870ebb8f1daa5d9c6120b1ae695c15e652c7d3b9f13815ea13f8fedce01" alt="Imagem Postada" />) ele não mostra os recados e da o erro 500.100:
>
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC para Microsoft Access]Erro geral Não é possível abrir a chave 'Temporary (volatile) Jet DSN for process 0x778 Thread 0xf64 DBC 0x1488b34 Jet' do Registro.
/novo/MURAL/common2.asp, line 38
Mas se eu tiro as permissões ele da erro na hora de inserir um comentário falando que não tem permissão.
Abiaxo segue o código do arquivo common2.asp
>
Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("guestbook.mdb")
adoCon.Open strCon
strCodeField = "Code"
strCode = "nolinks2002"
Set rsConfiguration = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblConfiguration.* From tblConfiguration;"
O banco de dados está na mesma pasta dos arquivos, acredito que não seja por problema de chamada.
Não sei mais aonde recorrer.
Agradeço desde já a paciência.
Obrigado
Ninguém sabe de alguma alternativa?
Uma luz por favor galera.....preciso deste mural!
Dê a permissão conforme você fez e vá ao IIS e dê permissão também, talvez resolva seu problema.
vou testar...valeu
>
mais você já deu permissão na pasta???
at+
Cabo....na pasta eu já dei permissão e não mudou nada...Como é que eu dou permissão no IIS?
Abra o IIS (iniciar/ painel de controles/ ferramentas administrativas/ internet information service)
Localiza a pasta onde está o banco de dados. Clica com o botão contrário sobre ela, e vá em Propriedades. Lá você marca LER e GRAVAR.
>
Abra o IIS (iniciar/ painel de controles/ ferramentas administrativas/ internet information service)
Localiza a pasta onde está o banco de dados. Clica com o botão contrário sobre ela, e vá em Propriedades. Lá você marca LER e GRAVAR.
Infelizmente ainda nada....veja o erro:
>
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC para Microsoft Access]Erro geral Não é possível abrir a chave 'Temporary (volatile) Jet DSN for process 0xa84 Thread 0x70c DBC 0x1430064 Jet' do Registro.
/novo/mural/common2.asp, line 33
Abaixo novamente o código:
<%
'Dim adoCon
'Dim rsConfiguration
'Dim strCon
'Dim strSQL
Dim intRecordsPerPage
'Dim strBgColour
'Dim strTextColour
'Dim strLinkColour
'Dim strTextType
'Dim intTextSize
'Dim strTableColour
'Dim strTableBorderColour
'Dim strTableTitleColour
'Dim strVisitedLinkColour
'Dim strActiveLinkColour
'Dim strHoverLinkColour
Dim blnLCode
Dim blnEmail
Dim strCode
Dim strCodeField
Dim strWebSiteEmailAddress
Dim strMailComponent
Dim strSMTPServer
Dim strLoggedInUserCode
Dim strTitleImage
Dim intMsgCharNo
Dim blnCookieSet
Dim blnIPBlocking
Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("guestbook.mdb")
adoCon.Open strCon
strCodeField = "Code"
strCode = "nolinks2002"
Set rsConfiguration = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblConfiguration.* From tblConfiguration;"
rsConfiguration.Open strSQL, strCon
If NOT rsConfiguration.EOF Then
strMailComponent = rsConfiguration("mail_component")
strSMTPServer = rsConfiguration("mail_server")
strBgColour = rsConfiguration("bg_colour")
strTextColour = rsConfiguration("text_colour")
strTextType = rsConfiguration("text_type")
intTextSize = CInt(rsConfiguration("text_size"))
strLinkColour = rsConfiguration("links_colour")
strTableColour = rsConfiguration("table_colour")
strTableBorderColour = rsConfiguration("table_border_colour")
strTableTitleColour = rsConfiguration("table_title_colour")
strVisitedLinkColour = rsConfiguration("visited_links_colour")
strHoverLinkColour = rsConfiguration("active_links_colour")
strWebSiteEmailAddress = rsConfiguration("email_address")
blnLCode = CBool(rsConfiguration("Code"))
blnEmail = CBool(rsConfiguration("email_notify"))
intRecordsPerPage = CInt(rsConfiguration("Comments_per_page"))
strTitleImage = rsConfiguration("Title_image")
intMsgCharNo = rsConfiguration("Message_char_no")
blnCookieSet = CBool(rsConfiguration("Cookie"))
blnIPBlocking = CBool(rsConfiguration("IP_blocking"))
End If
%>
cARA....DEU CERTO....Muito obrigado....muito obrigado mesmo
Muito bom. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif
Mas como resolveu?
mais você já deu permissão na pasta???
at+