Piano

Muito obrigado!

Confere se voce seguiu os passos desse site:
http://www.baboo.com...P_a9761_z0.aspx

SOLUÇÃO

Finalmente achei a solução para um problema que me fez quebrar muito a cabeça!
Não há explicação para o problema em português em lugar algum, então irei compartilhar.

- Abra o ISS.
- Vá em 'Pool de Aplicativos'.
- Clique no seu site.
- Do lado direito clique em 'Configurações Avançadas...'.
- Mude 'Habilitar Aplicativos de 32 Bits' para 'True'.
- OK.

Para melhores resultados talvez você queira também mudar 'Máximo de Processos do Operador' de 1 para 10.

Uma solução MUITO simples, mas que me atrapalhou bastante.

Fonte em inglês:
http://www.insideria...-microso-1.html

Algumas palavras-chave:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
Microsoft Access, IIS, 64 Bits.

Tentei das duas maneiras, mas não funcionou. O que está errado?

<%
sql="SELECT * FROM andamento"
tabela.open sql,conexao,3,3
SetLocale("pt-br")
IF tabela("A1") = "Sim" Then
   A1 = "checked"
End If
while not tabela.eof
%>
<table width="20%" class="sample">
<tr><td>Contrato<td><%=tabela("Contrato")%>
<tr><td>A1<td><%="<input type='checkbox' value='Sim' name='A1'" & A1 & ">"%>

<%if tabela("A1") = "Sim" THEN%>
<input type="checkbox" name="A1" checked>
<%else%>
<input type="checkbox" name="A1">
<%end if%>

Olá,

Consegui mudar a conexão para a seguinte:

<%
dim banco, conexao, tabela
set conexao=server.CreateObject("Adodb.connection") 
set tabela=server.CreateObject("Adodb.recordset") 
banco = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("..\bancodb.mdb") & ";Jet OLEDB:Database Password=senha;"
conexao.open banco
%>

Funcionou no computador que programo. Passei os arquivos para o computador que será usado como servidor (Windows Vista). E continua a não funcionar.

Acho que o problema é ele estar rodando OLEDB ou ODBC do Windows 64bits, tenho como mudar isso?