Microsoft JET Database Engine (0x80004005)

[pedrovisk 1]

PELO AMOR DE DEUS!QUE ERRO EH ESSE?POIS JÁ DEI TODAS AS PERMISSÕS A BASTA DO BD E MESMO ASSIM ISSO NO IIS DO XP PRO.CONTINUA DANDO ESSE ERRO.Tipo de erro:Microsoft JET Database Engine (0x80004005)O mecanismo de banco de dados Microsoft Jet não pode abrir o arquivo 'c:\inetpub\wwwroot\Sigma\Dados\snitz_forums_2000.mdb'. Ele já foi aberto em modo exclusivo por outro usuário ou você precisa de permissão para exibir seus dados./forum/inc_header.asp, line 115SEGUE ALGUMAS LINHA DO CÓDIGO, MAS ISSO SÓ NÃO ACONTECE COM ESTA PÁGINA NÃO, COM QUALQUER PÁGINA QUE REALIZA UMA CONSULTA AO BANCO.SEGUE ALGUMAS LINHAS DO CODIGO '## START - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENTResponse.Write "<meta name=""copyright"" content=""This Forum code is Copyright © 2000-02 Michael Anderson, Pierre Gorissen, Huw Reddick and Richard Kinser, Non-Forum Related code is Copyright © " & strCopyright & """>" & vbNewline '## END - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENTResponse.Write "</head>" & vbNewLine & _"<body" & strTmpPageBGImageURL & " bgColor=""" & strPageBGColor & """ text=""" & strDefaultFontColor & """ link=""" & strLinkColor & """ aLink=""" & strActiveLinkColor & """ vLink=""" & strVisitedLinkColor & """>" & vbNewLine & _"<table border=""0"" cellspacing=""0"" cellpadding=""5"" width=""50%"" height=""40%"" align=""center"">" & vbNewLine & _" <tr>" & vbNewLine & _" <td bgColor=""navyblue"" align=""center""><p><font face=""Verdana, Arial, Helvetica"" size=""2"">" & _"<b>There has been a problem...</b><br /><br />" & _"Your <b>strDBType</b> is not set, please edit your <b>config.asp</b><br />to reflect your database type." & _"</font></p></td>" & vbNewLine & _" </tr>" & vbNewLine & _" <tr>" & vbNewLine & _" <td align=""center""><font face=""Verdana, Arial, Helvetica"" size=""2"">" & _"<a href=""default.asp"" target=""_top"">Click here to retry.</a></font></td>" & vbNewLine & _" </tr>" & vbNewLine & _"</table>" & vbNewLine & _"</body>" & vbNewLine & _"</html>" & vbNewLineResponse.Endend ifset my_Conn = Server.CreateObject("ADODB.Connection")my_Conn.Mode = 3 '3 = adModeReadWriteLINHA 115 --- my_Conn.Open strConnStringif (strAuthType = "nt") thencall NTauthenticate()if (ChkAccountReg() = "1") thencall NTUser()end ifend ifOBRIGADO

[Libos 0]

Erro de proteção no compartilhamentoFaça as seguintes estapas.1. abra o Windows Explorer2. selecione ferramentas --> Opção de Pastas3. selecione Modo de Exibição --> Verifique se a opção usar compartilhamento simples do windows está habilitada, se estiver desabilite.4. Agora entre nas propriedades da pasta onde está o seu sistema, vai apareçer uma aba com o título segurança.5. Adicione o usuário nomedasuamaquina_IUSR_nomedasuamaquina- Tenta ai.Espero que de certo

[pedrovisk 1]

AMIGO, MUITO OBRIGADO PELA DICA.MAS JÁ FIZ TODOS ESSE PROCESSO E NÃO ADIANTOU DE NADA.NÃO SEI MAIS O QUE FAZER.