[Teixeira]

A clicar no botão (login.asp) para cadastrar uns registros no banco de dados "bancodedados.mdb" não cadastra e abre uma página de erro indicando:

"Tipo de 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 0x12fc Thread 0x1664 DBC 0x149250c Jet' do Registro.
/livro/conexao.asp, line 8"

--------
O "conexao.asp" tem o seguinte código:

<%
'Configurações Regionais
'1046 é o padrão brasileiro de data e moeda
Session.LCID = 1046

'Conexao com Banco de Dados
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("database/bancodedados.mdb")
%>

------
A lina 8 é:
"Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("database/bancodedados.mdb")"


Não tenho muita prática mas se Deus quiser será o meu primeiro ".asp" chamando um banco de dados.

As operações com ODBC, IIS acredito que esteja tudo correto.

Muito obrigado que puder me ajudar

[xanburzum]

verfique as permissoes, se estao todas corretas.....

[Teixeira]

Tudo correto. O banco de dados está local.
Não quero formar juizo do autor mas já encontrei a mesma crítica de não registrar os dados no bd.
Primeiro abre o login.asp. Como não sou cadastrado no bando de dados (bancodedados.mdb) lico no "aqui" do login.asp.
Abre o cadastro.asp. Depois de preencher os dados cliqco no botão "cadastrar". Abre a tela com a informação abaixo
que cita a linha 8 do conexao.asp. Nesse o códido tem o caminho:
----------------------
<%
'Configurações Regionais
'1046 é o padrão brasileiro de data e moeda
Session.LCID = 1046

'Conexao com Banco de Dados
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("\database\bancodedados.mdb")
%>

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

Será que está errado o caminho?

Se o ISS estivesse com problema ao digitar http://localhost não abriria a página com todas as informações.



Não é possível exibir a página
Ocorreu um problema com a página que você está tentando acessar e não é possível exibi-la.

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

Experimente o seguinte:

Clique no botão Atualizar ou tente novamente mais tarde.

Abra a localhost home page e procure os links para as informações desejadas.
HTTP 500.100 - Servidor interno Erro - erro do ASP
Internet Information Services

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

Informações técnicas (para a equipe de suporte)

Tipo de 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 0x13ac Thread 0x1498 DBC 0x151efe4 Jet' do Registro.
/livro/conexao.asp, line 8


Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.4; .NET CLR 1.1.4322; InfoPath.2; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)

Página:
POST 245 bytes to /livro/cadastro_salvar.asp

[xanburzum]

desabilite a opção no browser de exibir mensagens de erro HTTP amigaveis, e certifique-se de nao estar deixando o Access aberto, dá uma olhada neste link
e altere para para uma conexao OLEDB

CÓDIGO

<%
sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

[Teixeira]

Não rodou. Estou cansado...
O pior é que verifiquei se fosse trabalhar com CF daria certo.
No Dreamweaver constatei que a funcionou o ODBC.
Mandei para a empresa de hospedagem e funcionou. E agora como vou fazer meus testes local?

[xanburzum]

qual a versão do windows que você esta usando...

[Teixeira]

Windowos xp, versão 5.1 - Serviço pack 3.
E o pior é que se fosse com CF estaria funcioando. Simulei com o Dreamweaver e conseguir ver as tabelas.
A empresa de hopedagem não trabalha com ColdFusion. Já andei fazendo a muito tempo alguma coisa muito simples com CF. Dava um nome ao recordset e chamava no inícia da minha página. E o que é bom que você faz a SQL no Dreamwever, testa e tudo. Depois é só chamar e query na tabala.
Infelizmemente eu não tenho outro livro com outro exemplo de .asp para conectar a um banco de dados em access para testar.
Inclusive , solicito que puder me indicar algum local para estudar como fazer com que um registro em uma tabala pode chegar até uma tabela.
Cria no código uma query? E faz a SQL e chama o registro diretamente na tabela? Nunca tive oportunidade de ver tal coisa em "ASP". Gostaria de ler um algo sobre.
Muito obrigado pela atenção mas continuo na luta. No local da hospegaem está funcionaldo o "forum", como teste mas gostaria muito de ter também no meu computador. Acho bem melhoe antes estudar tudo localmente e deppois gravar no servidor. É melhor. Correto?

[xanburzum]

use uma conexão OLEDB, e poste como esta sua string de conexão

[Teixeira]

O caminho no explorar é: C:\inetpub\wwwroot\arquivo_asp\dados
No fonte de daos ODBC é: C:\inetpub\wwwroot\arquivo_asp\dados\info16br.mdb

Conexão: conexao.asp que tem o código:

<%
'Configurações Regionais
'1046 é o padrão brasileiro de data e moeda
Session.LCID = 1046

ConnString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:/inetpub/wwwroot/info16br/dados/info16br.mdb;"

'Conexao com Banco de Dados
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnString

%>

Na págima de erro informa agora:

Tipo de erro:

Microsoft JET Database Engine (0x80004005)
'C:\inetpub\wwwroot\info16br\dados\info16br.mdb' não é um caminho válido. Certifique-se de que o nome do caminho esteja escrito corretamente e que você esteja conectado ao servidor no qual o arquivo reside.
/arquivo_asp/conexao.asp, line 10


Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.4; .NET CLR 1.1.4322; InfoPath.2; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)

Página:
POST 69 bytes to /arquivo_asp/aut.asp

POST Data:
email=carlos.teixeira@terra.com.br&senha=qapqap&botao_entrar=+Entrar+

Hora:
sábado, 27 de fevereiro de 2010, 17:11:45

[xanburzum]

utilize o server.mappath

vocô pode ter um arquivo chamado conexao, onde nele utiliza uma sub para abrir e fechar a conexao, e nas paginas use assim, invocando o include

CÓDIGO

sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

e nas pagnas

CÓDIGO

<!--#include file="conn/conexao1.asp"-->
<%
call abreconexao

[Teixeira]

Muito obrigado pela atenção
xanburzum mas eu não entendi. E se eu mudar o código, como ficará no local da hospedagem que está funcionando? Não me conformo com isso. Coloquei outro exemplo de conexão com ".asp" e apresenta o mesmo erro, não faz a conexão.
O que na realmente quer informar essa mensagem? Meu ODBC não está correto? É problema de IIS

Tipo de 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 0x17fc Thread 0xdd8 DBC 0x1568024 Jet' do Registro.
/cadastro_xp/login_exe.asp, line 26


Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.4; .NET CLR 1.1.4322; InfoPath.2; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)

Página:
POST 58 bytes to /cadastro_xp/login_exe.asp

POST Data:
login=teste&senha=123456&imageField2.x=36&imageField2.y=14

Hora:
segunda-feira, 1 de março de 2010, 20:41:35


Mais informações:
Suporte da MicrosoftAcho que não estou sozinho com esse problema. Veja o que encontrei em http://www.aspisfun.com/errors/volatile.html, parece ser o meu problema:

Temporário voláteis Jet DSN para o processo - não é possível abrir chave do Registro


Os códigos de erro em ASP pode deixá-lo louco às vezes. Como você consertá-lo se você ver o erro temporário voláteis Jet DSN para o processo - não é possível abrir a chave de registro?

Primeiro, esta, em geral, significa que há um problema de permissão de ficar no banco de dados. Geralmente isso acontece quando você faz um patch de segurança em seu servidor, reinicie o servidor, ou instalar software de firewall. Todas estas coisas podem causar o usuário da web a perder a permissão para acesso a arquivos críticos.

Então, primeiro, verificar o básico. Certifique-se que IUSR tem permissão para tanto o diretório contendo o arquivo de dados e para todos os diretórios temp sendo usado. Certifique-se que a seqüência de conexão DSN é realmente apontado para o diretorio que está a trabalhar!

Mesmo se você pensou que estes foram fixados corretamente, uma reinicialização ou uma atualização de segurança pode ter desactivado eles. Verifique novamente.

Em seguida, olhar para todos os blocos de segurança que possam ter sido adicionados. Você adicionou algum software antivírus ou firewall recentemente? Experimente desligá-lo e ver se isso ajuda. Se isso acontecer, desligue o software novamente e depois ir para sua configuração, e permitir o acesso aos diretórios em questão.

Erro ASP Listing e Soluções

[xanburzum]

você precisa setar todas as permissões corretamente....
caso esteja corretas, verifique o MDAC se é o mais recente.

[Teixeira]

Por favor, tem nomes que se tornam confusos para quem está iniciando. É a primeira vez que estou vendo um arquivo ASP na minha frente. Tenho muitas dúvidas ainda.
Faz muitos anos que fiz alguma coisa simples em ColdFusion e sei fazer a conexão e sei testar o banco de dados se está ou não funcionando. Então porque você não usa ColdFusion? 1º - não tenho instalado na minha máquina o ColdFusion; 2º local da hospedagem não aceita e 3º comecei a estudar arquivos "asp" e gostei mas estou encontrando esse problema de conexão.
Agora mesmo estou lendo "Testando e Resolvendo problema de IIS", pelo que entendi está funcionando. Digitei o URL na caixa de texto Endereço do "http://localhost/" e abriu uma página com uma relação de todos os arquivos, como por exemplo o primeira da lista (clicando no nome abre o aquivo .asp mas apresenta erro ao tentar a conexão):


localhost - /

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

domingo, 28 de fevereiro de 2010 00:44 <dir> arquivo_asp


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

O que estou pedindo é que alguem com mais experencia informasse se digitando "http://localhost/" no endereço do Internet Explore e abrir uma página com todas as pastas do diretorio C:\inetpub\wwwroot fica afastada a possibilidade de problema de instalção ISS ou não? Seria o ODBC? Não estou sabendo colocar o caminho?

Se elguem tiver algum arquivo ".asp" e um banco de dados, por favor envie (carlos.teixeira@terra.com.br) com as orientações de criação do ODBC para testar. Gente não desejo moleza alguma estou ralando para aprender. Não aceito que um aquivo ".asp", funcione no no local da hospedagem e não funcione aqui (guardando a mudasnas no caminho das pastas. Muito Obrigado

[Teixeira]

Deletei a site no Dreamweaver, deletei o ODBC e refiz tudo. Com isso, agora vejo a conexão via Application, Database (tabelas do banco de dados). Com isso também abriu a página do forum não apresentado aquela página de erro. Agora o "login.asp" funciona, abre a página do forum. Porém ao entrar com registro para salvar no banco abre uma página de erro, informando:
------------------------------------------
Informações técnicas (para a equipe de suporte)

Tipo de erro:
Microsoft JET Database Engine (0x80040E09)
Não é possível atualizar. O banco de dados ou o objeto é somente leitura.
/arquivo_asp/topico_salvar.asp, line 13


Tipo de navegador:
Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.4; .NET CLR 1.1.4322; InfoPath.2; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)

Página:
POST 56 bytes to /arquivo_asp/topico_salvar.asp

POST Data:
titulo=hoje+03%2F02&texto=nsnsdnsn&botao_salvar=+Salvar+

Hora:
terça-feira, 2 de março de 2010, 15:42:38
-----------------------------------------------------------------

A linha 13 do arquivo "topico_salvar.asp" é:

RS.AddNew


Código todo de "topico_salvar.asp" é:

CÓDIGO

<!--#include file="lock.asp" -->
<!--#include file="conexao.asp" -->
<%
'Cria um registro para o novo topico no banco de dados com as informações:
'Usuario_Id (id do usuário que está criando o topico)
'Forum_Titulo (Titulo do topico)
'Forum_Texto (Conteudo do topico)
'Forum_Data (Data atual)
Sql = "SELECT TOP 1 * "&_
      "FROM Forum"
Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open Sql,Conn,1,2
RS.AddNew
RS("Usuario_Id") = Session("Usuario_Id")
RS("Forum_Titulo") = Request("titulo")
RS("Forum_Texto") = Request("texto")
RS("Forum_Data") = now()
RS.Update
RS.Close
'Redireciona para a pagina que lista todos os topicos
Response.Redirect("index.asp?ir=forum.asp")
%>

Esse mesmo código funciona no local da hospedagem não pode apresentar erro aqui.

Por favor, e agora o que é?

This post has been edited by xanburzum: 02 March 2010 - 06:10 PM
Reason for edit: Adicionado BBCode CODE

[xanburzum]

ao inves de usar o metodo AddNew do ojb recordset, use um Insert do SQL direto no banco, e você precisa dar direitos administrativos, permissões no banco

[Teixeira]

Zanburzum, meu respeito mas não entendo. Agora mesmo fui no site http://informacaoteixeira.com.br/ e na parte superir tem "Forum" cliquei e postei um bla bla bla lá.
E não apresentou erro. Como local apresenta erro? É o mesmo banco os mesmos arquivos ".asp" por que devo mudar código? Tudo bem em se tratando de caminho tenho que mudar mas SQL? Volto a pedir desculpa mas desejo aprender. Todo o site é apenas para estudo de ASP, HTML, VBScript, Flash MX etc. Não repare.

[xanburzum]

tranquilo amigo verifique se o MDAC esta atualizado para banco e se tem todas as permissões, e olha um exemplo, um formulario e um action usando SQL, e também é bom, você antes de incluir, verificar no banco se não existe um registro igual, para não criar duplicidade, então faça uma pesquisa antes.

formulario

CÓDIGO

<% 'aplicaçaun para efetuar a inclusao de dados
   'onde através de um form com os campos p/ inserir os valores
   'e serem postados para o inserir_action.asp
  
Option explicit
'declaro as var  
  dim varmsgeof
varmsgeof=request.querystring("msgeof") 'no caso de erro no incluir_action

    %>
    <script language="javascript">
    function novajan(){
window.open ("erro.asp","Erro","width=180,height=240,scrollbar=no,status=yes,resize=no")
}
</script>
<%    
    if varmsgeof <> "" then
    response.write("<script>novajan();</script>")
    end if
    if Session("logado")="falso" then
    response.write("<script>novajan();</script>")
    end if
    %>

<html>
<head>
<title>Incluir Login</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript">
<!--
function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') {
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (val<min || max<val) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
  } if (errors) alert('The following error(s) occurred:\n'+errors);
  document.MM_returnValue = (errors == '');
}

function MM_popupMsg(msg) { //v1.0
  alert(msg);
}
//-->
</script>
<style>
body {SCROLLBAR-FACE-COLOR: #336699; SCROLLBAR-HIGHLIGHT-COLOR: #8080FF; SCROLLBAR-SHADOW-COLOR: #FFFFFF; SCROLLBAR-3DLIGHT-COLOR: #ffff99; SCROLLBAR-ARROW-COLOR: #FFFFFF; SCROLLBAR-TRACK-COLOR: #E6E6E6; FONT-FAMILY: Arial, Verdana; SCROLLBAR-DARKSHADOW-COLOR: #008080 }
input {  font: normal 10px Verdana, Arial, Helvetica, sans-serif; color: #0000FF; background: #CCCCCC}
</style>
</head>

<body bgcolor="#FFFFFF" text="#000000">
<table width="75%" border="0" height="139" cellpadding="0" cellspacing="0" align="center">
<tr> <td bgcolor="#666666" width="2%"> <div align="center"><b><img src="file:///A|/asp/imgs/curva.gif" width="10" height="19"></b></div></td><td bgcolor="#336699" width="98%">
<div align="center"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF" size="3">::
</font><font face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF" size="2">Cadastro
de Login</font><font face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF" size="3">
</font></b></div></td></tr> <tr bgcolor="#336699"> <td height="5" colspan="2">&nbsp;</td></tr>
<tr bgcolor="#e6e6e6"> <td height="163" colspan="2"> <form name="form1" method="post" action="incluir_action_treina.asp">
<table width="99%" border="0" bordercolor="#e6e6e6"> <tr> <td><b><font color="#336699" size="1" face="Verdana, Arial, Helvetica, sans-serif">Entre
com o login: <input type="text" name="login" size="12" maxlength="12"> </font></b></td></tr>
<tr> <td height="12" bordercolor="0"><b><font color="#336699" size="1" face="Verdana, Arial, Helvetica, sans-serif">Entre
com sua senha: <input type="password" name="senha" size="8" value="" maxlength="8">
</font></b></td></tr> <tr> <td bordercolor="0"><b><font color="#336699" size="1" face="Verdana, Arial, Helvetica, sans-serif">Entre
com o email: <input type="text" name="email" size="48" maxlength="48"> </font></b></td></tr>
<tr> <td bordercolor="0"> <div align="center">
                <input type="image" border="0" name="imageField" src="imgs/enviar.gif" width="87" height="22" onClick="MM_validateForm('login','','R','email','','RisEmail','senha','','R');MM_popupMsg('Obrigado por se cadastrar.');return document.MM_returnValue" align="middle">
</div></td></tr> </table></form></td></tr> </table>
<p>&nbsp;</p>
</body>
</html>

action

CÓDIGO

<% 'incluir_action.asp => fazer a inclusao no BD, antes fazendo uma verificaçao
   'no BD através de SQL Select if not rs.eof then
   'redireciono para incluir_form.asp?msgeof=1 else
   'incluo no bd atraves da SQL Insert e redireciono para adiministraçao.asp?msg=1
   'e lá receberá um mensagem de sucesso
  
   Option explicit
   'declaro as var
   dim varlogin, varemail, varsenha, conexao, conDBQ, constring, rsselect, SQLselect, rsinsert, SQLinsert,rsselect2,SQLselect2
   'recupero todos os dados
   varlogin=trim(request.form("login"))
   varsenha=trim(request.form("senha"))
   varemail=trim(request.form("email"))
   'crio a conexao
   %>
   <!--#include file="conn/conexao1.asp"-->
   <% 'abrir a conexao
   call abreconexao
   'crio o rsselect para verificar se os dados jah estaun cadastrados
   set rsselect=server.createobject("ADODB.Recordset")
   'crio o SQLselect
   SQLselect="SELECT login FROM login WHERE login='"&varlogin&"'"
   rsselect.open SQLselect,conexao,1,3
   if not rsselect.eof then
           response.redirect("incluir_form_treina.asp?msgeof=1")
        set rsselect=nothing
   else    
           'crio o rsinsert para inseiri os dados no bd
            set rsinsert=server.createobject("ADODB.Recordset")
        'crio o SQLinsert pra incluir no bd
        SQLinsert="INSERT INTO login(login,senha,email) values('"&varlogin&"','"&varsenha&"','"&varemail&"')"
        rsinsert.open SQLinsert,conexao,1,3
        'response.redirect("administracao_treina.asp?msg=1")
        set rsinsert=nothing
    end if
    set rsselect2=server.createobject("ADODB.Recordset")
    SQLselect2="SELECT login FROM login WHERE login='"&varlogin&"'"
   rsselect2.open SQLselect,conexao,1,3
   response.write(rsselect2("login"))
    
    call fechaconexao %>

[Teixeira]

É o seguinte, já percebi que você é realmente uma pessoa que leva muito a sério o forum e sabe o suficiente para transmitir, inclusive em um nível muito bom mas para meu nível fica pesado. Ainda estou caminhando. Nunca criei nada em ".asp". Exemplo: o que você acabou de orientar é que devo criar um arquivo ".asp" com o nome formulário.asp? e o outro com o nome "action.asp". Procurei o nome de alguma tb para criar se fosse o caso mas não encontrei. Resumindo criei os arquivos com esses nomes (copiei e colei) para o Dreamweaver e nada aconteceu é lógico. Estou fazendo tudo errado errado. É claro que você não tem nada com issso com a minha ignorância. Suas orintações estão corretas.
Você pediu, também para verificar o MDAC se está atualizado. No link existem muitos arquivos, ou seja:

Microsoft Data Access Components (MDAC) 2.8
Microsoft Data Access Components (MDAC) 2.8 SP1
MDAC 2.6 Service Pack 2
Microsoft Data Access Components (MDAC) Security Patch MS04-003 (32-bit)
Microsoft Data Access Components (MDAC) 2.8 Software Development Kit

Qual que devo baixar. Sei que estou aprendendo mas criei outro problema na minha cabeça.

Mesmo com tudo isso fui até o site da microsoft para resolver esse caso do MDAC e baixei e instalei o "MDAC 2.7 Refreh" não sei se cometi um erro no final deu "Microsoft Data Access Components 2.7 foi instalado com êxito no sistema". Fiz errado?


Por favor, você pode responder essas perguntas:

a) se o MDAC não estivesse funcionando através do Dreamweaver poderia construir uma SQL, testar os regitros e ve-los todos listados na área de teste?

poderia entrando no Dreamweaver em "Custon Connection String" clinado em "Test", receber a informação "Connection was made successfully" com esse a "Connection String" - "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:/inetpub/wwwroot/codigo_fonte/dbs/banco.mdb".?

c) Esses testes foram todos com indicação de "sucesso" mas mesmo assim o MDAC pode não está atualizado?

Por favor, não desejo melindrar nimguem é que estou iniciando. Observe que estou praticamente o dia todo aqui, sem falar nos outros dias que já fiquei até de madrugada lendo sobre ".asp" conexão.
Mas se Deus quiser vou conseguir.


Observe o seguinte:
Tenho um banco chamado "baco.mdb" com 4 registros. Criei o ODBC, testei OK
Pelo Dreamweaver criei o site, criei o Recordset, Test a conexão, aparecem todos os registros. OK
O "exemplo_conexao_banco.asp" tem esse código:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/conexao.asp" -->
<%
Dim qry_dados
Dim qry_dados_numRows

Set qry_dados = Server.CreateObject("ADODB.Recordset")
qry_dados.ActiveConnection = MM_conexao_STRING
qry_dados.Source = "SELECT nome_cliente, data_inclusao, valor_cobrado FROM dados"
qry_dados.CursorType = 0
qry_dados.CursorLocation = 2
qry_dados.LockType = 1
qry_dados.Open()

qry_dados_numRows = 0
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>

<body>
<table border="1">
<tr>
<td>nome_cliente</td>
<td>data_inclusao</td>
<td>valor_cobrado</td>
</tr>
<% While ((Repeat1__numRows <> 0) AND (NOT qry_dados.EOF)) %>
<tr>
<td><%=(qry_dados.Fields.Item("nome_cliente").Value)%></td>
<td><%=(qry_dados.Fields.Item("data_inclusao").Value)%></td>
<td><%=(qry_dados.Fields.Item("valor_cobrado").Value)%></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
qry_dados.MoveNext()
Wend
%>
</table>
</body>
</html>
<%
qry_dados.Close()
Set qry_dados = Nothing
%>




Porém, quando dou um F12 não aparecem os registros do banco.mdb dentro das células da tabela.
Apresenta erro na linha 8 que tem: qry_dados.ActiveConnection = MM_conexao_STRING

Quem criou isso foi o assistente do Dreamweaver. E apresenta erro?
Por que esse erro na linha 8?


Não sei se isso vem ser um problema. (embora na criação do ODBC indica mdb; accdb)
Na minha máquina tenho o Access 2003 e o 2007.
Todos os arquivos que testei foram salvos com Access 2000.

Obsevei que com arquivos criados no Access 2007 (accdb) não consigo fazer o ODBC. Informa que não encontrou o arquivo.
Como vou resolver isso?


Mesmo instalansdo o MDAC 2.7 continua tudo como antes (conexão OK no Dreamweaver, vejo as tabelas) mas dando um F12 apresenta erro e não aparece os registros.


xanburzum sou diabético e a ansiedade faz subir a glicoso mas vou em frente. Observe que tenho ficado até tarde e bemmcedo caio dentro. Lembrei desses detalhes e editei a mensagem agora.
Tive um mestre que dizia "So programa quem programa" tem que cair dentro mesmo. Obrigado por tudo. Qualquer coisa me mande para aprender a colocar dados de banco de dados nos sites.

[xanburzum]

como você esta iniciando no ASP, existem na seção de artigos, alguns tutoriais, que irá esclrecer bastante coisa, entra nos artigos, e surgindo dúvida, pode postar aqui....

[Teixeira]

Por favor, as perguntas são muito importantes. Com arelação a procurar no forum tenho feito isso (veja as minhas perguntas sobre aulas etc.) tenho feito
Mas, você não poderia responder:

Por favor, você pode responder essas perguntas:

a) se o MDAC não estivesse funcionando através do Dreamweaver poderia construir uma SQL, testar os regitros e ve-los todos listados na área de teste?

poderia entrando no Dreamweaver em "Custon Connection String" clinado em "Test", receber a informação "Connection was made successfully" com esse a "Connection String" - "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:/inetpub/wwwroot/codigo_fonte/dbs/banco.mdb".?

c) Esses testes foram todos com indicação de "sucesso" mas mesmo assim o MDAC pode não está atualizado?

Por favor, não desejo melindrar nimguem é que estou iniciando. Observe que estou praticamente o dia todo aqui, sem falar nos outros dias que já fiquei até de madrugada lendo sobre ".asp" conexão.
Mas se Deus quiser vou conseguir.

[xanburzum]

a) se o MDAC não estivesse funcionando através do Dreamweaver poderia construir uma SQL, testar os regitros e ve-los todos listados na área de teste?

poderia entrando no Dreamweaver em "Custon Connection String" clinado em "Test", receber a informação "Connection was made successfully" com esse a "Connection String" - "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:/inetpub/wwwroot/codigo_fonte/dbs/banco.mdb".?

c) Esses testes foram todos com indicação de "sucesso" mas mesmo assim o MDAC pode não está atualizado?

Por favor, não desejo melindrar nimguem é que estou iniciando. Observe que estou praticamente o dia todo aqui, sem falar nos outros dias que já fiquei até de madrugada lendo sobre ".asp" conexão.
Mas se Deus quiser vou conseguir.

[xanburzum]

a) se o MDAC não estivesse funcionando através do Dreamweaver poderia construir uma SQL, testar os regitros e ve-los todos listados na área de teste?
tendo

Nao como o dreamweaver , faz a conexao internamente, pode até ser por DSN, mas vc fazendo da forma que te falei

<% '----------------------


sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
'o caminho no server é X:\inetpub\wwwroot\db\quaddra.mdb
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

poderia entrando no Dreamweaver em "Custon Connection String" clinado em "Test", receber a informação "Connection was made successfully" com esse a "Connection String" - "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:/inetpub/wwwroot/codigo_fonte/dbs/banco.mdb".?
desta forma vc faz uma conexao ODBC, utilizando Provider, ele é mais rápido, conexao OLEDB

c) Esses testes foram todos com indicação de "sucesso" mas mesmo assim o MDAC pode não está atualizado?
tendo o MDAC - Microsoft Data Access Components (MDAC) 2.8
Microsoft Data Access Components (MDAC) 2.8 SP1
ja esta atualizado.

[Teixeira]

Por favor, com relação a pergunta:

c ) Esses testes foram todos com indicação de "sucesso" mas mesmo assim o MDAC pode não está atualizado?
tendo o MDAC - Microsoft Data Access Components (MDAC) 2.8
Microsoft Data Access Components (MDAC) 2.8 SP1
ja esta atualizado.


Você respondeu que:
"tendo o MDAC - Microsoft Data Access Components (MDAC) 2.8
Microsoft Data Access Components (MDAC) 2.8 SP1
ja esta atualizado."

Correto? Mas não informei mas ao entrar naquele link, como não sabia qual baixar optei pelo "MDAC 2.8 RTM" e recebi uma mensagem "MDAC 2.8 RTM não é compatível com o seu Windows".
Ai baixei "Microsoft Data Access Components 2.7 que instalou."
Vou tentar novamente, inclusive o seu código na minha conexão.

Fique com Deus e obrigado

[Teixeira]

Recebi mensagem de erro ao tentar instalar:


o MDAC - Microsoft Data Access Components (MDAC) 2.8 e/ou
Microsoft Data Access Components (MDAC) 2.8 SP1


Mensagem:
para Microsoft Data Access Components (MDAC) 2.8 SP1 - Erro fatal na intalação - Esta instalação não oferece suporte neste sistema operacional.
MDAC - Microsoft Data Access Components (MDAC) 2.8 - também apresentou erro.


Tenho o CD do Windows XP Professional e for necessário instalar algum componente.
Com posso descobrir qual é a versão do MDAC do meu computador?

Muito obrigado e desculpe a forma de colocar as coisas. A ansiedade para aprender é grande.

[xanburzum]

olha este exemplo:

CÓDIGO

<%
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
            
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3
   %>
    </B></FONT></P><TABLE WIDTH="95%" BORDER="0" CELLPADDING="0" CELLSPACING="0" BGCOLOR="#666666" ALIGN="center">
<TR BGCOLOR="#336699"> <TD WIDTH="2%"> <DIV ALIGN="left"><B><IMG SRC="file:///A|/asp/imgs/curva.gif" WIDTH="10" HEIGHT="19"></B></DIV></TD><TD WIDTH="98%">
<DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2" COLOR="#FFFFFF">::
Seja Bem-Vindo <%=Ucase(varloginsession)%></FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699">
<TD HEIGHT="10" COLSPAN="2"> <DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#66ffff">Administra&ccedil;&atilde;o
de Usu&aacute;rios</FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="2">&nbsp;</TD></TR>
<TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="16"> <DIV ALIGN="right"><A HREF="pesquisa_form_treina.asp"><IMG SRC="imgs/busca2.gif" BORDER="0" ALT="Pesquisar na base de dados" WIDTH="78" HEIGHT="21"></A>&nbsp;</DIV></TD></TR>
<TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="2"> <DIV ALIGN="right">
        <script type="text/javascript">
AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0','width','80','height','20','src','incluir','quality','high','pluginspage','http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash','bgcolor','#336699','base','.','movie','incluir' ); //end AC code
</script><noscript><OBJECT CLASSID="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" CODEBASE="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" WIDTH="80" HEIGHT="20">
          <PARAM NAME="BGCOLOR" VALUE="#336699">
          <PARAM NAME="BASE" VALUE=".">
          <PARAM NAME=movie VALUE="incluir.swf">
          <PARAM NAME=quality VALUE=high>
          <EMBED SRC="incluir.swf" QUALITY=high PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" TYPE="application/x-shockwave-flash" WIDTH="80" HEIGHT="20" BGCOLOR="#336699" BASE=".">
          </EMBED> </OBJECT></noscript>
        &nbsp;</DIV></TD></TR> </TABLE><TABLE WIDTH="95%" BORDER="1" BORDERCOLOR="#666666" BGCOLOR="#e6e6e6" ALIGN="center">
<TR> <TD WIDTH="16%"> <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Login</B></FONT></DIV></TD><TD WIDTH="15%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Senha</B></FONT></DIV></TD><TD WIDTH="25%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Email</B></FONT></DIV></TD><TD WIDTH="20%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Atualizar</B></FONT></DIV></TD><TD WIDTH="24%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Excluir</B></FONT></DIV></TD></TR>
<%  while not rs.eof%>
<TR> <TD WIDTH="16%"> <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("login")%></B></FONT></DIV></TD><TD WIDTH="15%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("senha")%></B></FONT></DIV></TD><TD WIDTH="25%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("email")%></B></FONT></DIV></TD><TD WIDTH="20%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="atualizar_form_treina.asp?codigo=<%=rs("codigo")%>">Atualizar</A></B></FONT></DIV></TD><TD WIDTH="24%">
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="excluir_form_treina.asp?codigo=<%=rs("codigo")%>">Excluir</A></B></FONT></DIV></TD></TR>
<% rs.movenext
      wend
    set rs=nothing
  set conexao=nothing
%> </TABLE><P><BR></P></RightClick>
</BODY></HTML>

A Microsoft possui uma aplicação chamada component checker que é utilizada para verificar a versão do MDAC instalado em uma máquina. O component checker deve ser baixado do endereço http://www.microsoft.com/data/download.htm#CCinfo e instalado na máquina em questão.

E se você não quiser ou não puder realizar esta instalação ?

Neste caso é necessário verificar uma das 2 chaves de registry a seguir :

HKEY_LOCAL_MACHINE\Software\Microsoft\DataAccess\FullInstallVer
HKEY_LOCAL_MACHINE\Software\Microsoft\DataAccess\Version

Estas chaves contém informações sobre a versão instalada do MDAC

[Teixeira]

Por favor, consegui agora baixar o Component Checker e rodando o programa informou:


"The following product releases were matched MDAC 2.8 SP1 ON WINDOWS XP SP3
Would you like to re-run the query for a specific product release?"


Pelo que entendi as "DLLs" (arquivos) que foram analisados combimam com MDAC 2.8 SP1 no Windows XP SP3. Concorda?
E pela sua orientação está correto. Certo?

Essa preocupação de MDAC estou livre?

[xanburzum]

para efeitos de teste, crie uma conexão, conform eu mencionei acima, use o provider

[Teixeira]

CARA FUNCIONOU MESMO! (Estou gritando mesmo - com respeito). Valeu!
Graças a Deus a você pelo seu talento e paciência. Confesso que estava com vontade de abandonar essa conexão com código "asp". Cara estou ha dias tentando e só aqueles erros. Agora andei vendo que muita gente também rebe essa mensagem de erro. Pena que onde encontrei algo sobre a mensagem de erro que estava dando a postagem do forum não teve uma postagem final (a solução).Dessa forma, vamos aguardar a confirmação do xanburzum. Se realmente ficar confirmado que o entendimento é esse, fica aqui registrado a materia que estava tirando o sono e terminou bem.

Quer dizer que não é necessário criar o ODBC (fonte de dados).
Basta criar o código ".asp":

<%
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")

Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring

'crio o rs
set rs=Server.CreateObject("ADODB.Recordset")

'crio o SQL
SQL="SELECT * FROM login ORDER BY login"
rs.open SQL,conexao,1,3

%>



E chamar a rs nas Div das tabelas (por exemplo):

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("login")%></B></FONT></DIV></TD><TD WIDTH="15%">


aqui eu chamei o campo login da tabela - <%=rs("login")%>


e sempre tem que fechar com:

<% rs.movenext
wend
set rs=nothing
set conexao=nothing
%>



Por favor, confirme se é esse realmente o entendimento.
Agora vou ter que cair dentro dos SQL da vida caso contrario não nasce os resgistro na tela. Concorda!!

O Código todo ficou assim

CÓDIGO

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>

<%
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")

Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
            
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3
  
   %>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>

<body>

</B>
</FONT>
</P>
<TABLE WIDTH="95%" BORDER="0" CELLPADDING="0" CELLSPACING="0" BGCOLOR="#666666" ALIGN="center">
    <TR BGCOLOR="#336699">
        <TD WIDTH="2%">
            <DIV ALIGN="left">
            <B><IMG SRC="file:///A|/asp/imgs/curva.gif" WIDTH="10" HEIGHT="19"></B>
            </DIV>
        </TD>
        
        <TD WIDTH="98%">
            <DIV ALIGN="center">
            <B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2" COLOR="#FFFFFF">::Seja Bem-Vindo
            
            <%=Ucase(varloginsession)%>
            
            </FONT>
            </B>
            </DIV>
            
        </TD>
    </TR>
        
    <TR BGCOLOR="#336699">
        <TD HEIGHT="10" COLSPAN="2">
          <DIV ALIGN="center">
          <B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#66ffff">Administra&ccedil;&atilde;o de Usu&aacute;rios</FONT></B>
          </DIV>
        </TD>
    </TR>
            
    <TR BGCOLOR="#336699">
        <TD COLSPAN="2" HEIGHT="2">
        </TD>
    </TR>

    <TR BGCOLOR="#336699">
        <TD COLSPAN="2" HEIGHT="16">
          <DIV ALIGN="right"><A HREF="pesquisa_form_treina.asp"><IMG SRC="imgs/busca2.gif" BORDER="0" ALT="Pesquisar na base de dados" WIDTH="78"           HEIGHT="21"></A>
          </DIV>
        </TD>
     </TR>

    <TR BGCOLOR="#336699">
        <TD COLSPAN="2" HEIGHT="2">
           <DIV ALIGN="right">
        
        <script type="text/javascript">
        AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0','width','80','height',        '20','src','incluir','quality','high','pluginspage','http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash        ','bgcolor','#336699','base','.','movie','incluir' ); //end AC code
        </script>
        <noscript>
            <OBJECT CLASSID="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" CODEBASE=   "http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" WIDTH="80" HEIGHT="20">
        
                  <PARAM NAME="BGCOLOR" VALUE="#336699">
                  <PARAM NAME="BASE" VALUE=".">
                  <PARAM NAME=movie VALUE="incluir.swf">
                  <PARAM NAME=quality VALUE=high>
                  <EMBED SRC="incluir.swf" QUALITY=high PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" TYPE="application/x-shockwave-flash" WIDTH="80" HEIGHT="20" BGCOLOR="#336699" BASE=".">
               </EMBED>
            </OBJECT>
            </noscript>
            </DIV>
        </TD>
    </TR>
</TABLE>

<TABLE WIDTH="95%" BORDER="1" BORDERCOLOR="#666666" BGCOLOR="#e6e6e6" ALIGN="center">
    <TR>
        <TD WIDTH="16%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Login</B></FONT></DIV>
        </TD>
        
        <TD WIDTH="15%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Senha</B></FONT></DIV></TD><TD WIDTH="25%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Email</B></FONT></DIV></TD><TD WIDTH="20%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Atualizar</B></FONT></DIV></TD><TD WIDTH="24%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Excluir</B></FONT></DIV></TD></TR>

<%  while not rs.eof%>

    <TR>
        <TD WIDTH="16%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("login")%></B></FONT></DIV></TD><TD WIDTH="15%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("senha")%></B></FONT></DIV></TD><TD WIDTH="25%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("email")%></B></FONT></DIV></TD><TD WIDTH="20%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="atualizar_form_treina.asp?codigo=<%=rs("codigo")%>">Atualizar</A></B></FONT></DIV></TD><TD WIDTH="24%">
            <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="excluir_form_treina.asp?codigo=<%=rs("codigo")%>">Excluir</A></B></FONT></DIV></TD></TR>
    
<% rs.movenext
                wend
                set rs=nothing
                set conexao=nothing
                 %>

</TABLE>

<P><BR></P></RightClick>


</body>
</html>

[xanburzum]

exatamente...

[Teixeira]

Com Access 2007 - tem que mudar algo?
Tentei com "cadastro_emp.accdb" não funcionou.
Muito obrigado.

[xanburzum]

com Access 2007

CÓDIGO

Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"

[Teixeira]

Obrigado.
Desejo muito sucesso na sua vida.

[xanburzum]

obrigado ASPmano, pra você também...