none
Asp + Access! RRS feed

  • Pergunta

  • Pessoal, boa noite!

     

    Tenho um script asp para inserir dados no meu mdb que funciona perfeitamente! Só que precisei protegerr o arquivo.mdb com uma senha por questão de segurança! Mas me deparei com um problema? O script asp não consegue mais inserir dados no banco de dados? Como posso solucionar ? Talvez eu tenho que inserir a senha do bd no script asp? Mas aonde ?  Abaixo o asp? Aguém pode me ajudar ?

     

    <%

    Nome = Replace(request("nome"),"'", "''")
    Empresa = Replace(request("empresa"),"'", "''")
    Email = Replace(request("email"),"'", "''")
    Ddd = Replace(request("ddd"),"'", "''")
    Telefone = Replace(request("telefone"),"'", "''")
    Assunto = Replace(request("assunto"),"'", "''")
    Mensagem = Replace(request("mensagem"),"'", "''")

     

    StrMensagens = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("database") & "\wc.mdb"

     

    Set Conexao = Server.CreateObject("ADODB.Connection")

    Conexao.Open StrMensagens

     

    SQL = "insert into Mensagens (Nome,Empresa,Email,Ddd,Telefone,Assunto,Mensagem)"

     

    SQL = SQL & " values ('" & nome & "','" & empresa & "','" & email & "','" & ddd & "','" & telefone & "','" & assunto & "','" & mensagem & "')"

     

    Response.Write "&enviado=Sua Mensagem foi recebida com sucesso. Breve entraremos em contato,Obrigado!&"

    Conexao.execute SQL


    Conexao.Close
    set Conexao=nothing

    %>

     

    JC.

    sexta-feira, 1 de junho de 2007 01:11

Respostas

  • Pode ser aqui:

     

    Conexao.Open StrMensagens, "usuario", "senha"

     

    Se não tiver usuário, é só deixar esse parâmetro vazio ("").

    sexta-feira, 1 de junho de 2007 02:17

Todas as Respostas