Form, aque acontece

[Guest --Junior --]

Olá pessoal, sou novo em Asp, fiz uma formulário de cadastro mas não está utualizando o Banco de Dados.

Alguém pode me explicar esse erro ?

<% 

    Dim m_nome, m_dtnasc, erro
    m_nome = Request.Form("f_nome")
    m_dtnasc = Request.Form("m_dtnasc")
    
    if nome = Empty then
    Response.Write("Informe seu nome")
    erro = true
    End if 
    
    if not (IsDate(m_dtnasc)) then
    response.Write("Informe a data correta")
    erro = true
    End if
    
    if erro then
    response.Write("O formalário apresenta erros")
    
    else
    
    Set bd = Server.CreateObject("ADODB.connection")
    set rs=Server.CreateObject("adodb.connection")
    bd.open "driver={Microsoft Access Driver(*.mdb)};dbq=c:\inetpub\wwwroot\caramba.mdb"
    rs.open "Stabela", bd,1,3
    
    rs.Addnew
    rs("Nome") = m_nome
    rs("Email") = m_dtnasc
    rs.update
    
    Response.Write("Cadastro efetuado com sucesso")
    
    End if
    
    %>

[.Andreia.]

que erro?

[Guest marcelolins]

que erro?

[Guest --Junior --]

Esse é o problema, ele não dá erro nenhum, mas também não atualiza o Banco.

[BurnOS]

Cara... tá meio bagunçado issoê... ou você abre o banco com uma variável, ou abre um rs, ou cria um objeto... dá uma organizada...

***Set bd = Server.CreateObject("ADODB.connection")
***set rs=Server.CreateObject("adodb.connection")
***bd.open "driver={Microsoft Access Driver(*.mdb)};dbq=c:\inetpub\wwwroot\caramba.mdb"
***rs.open "Stabela", bd,1,3

Depois postaê o resultado...

Abraço

[Guest --Junior --]

Verdade... não tinha reparado nesse RS=Server abrindo outra conexão. Pode ser isso vou verificar.