Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Everson Junior

Pagina Não pode ser Encontrada

Recommended Posts

Galera, tenho um site de inscrição, no entando após preencher o formulário o usuário clica em inscrever....Em algumas maquina como a minha funciona perfeita mente, no entanto, em outras apresenta Pagina não pode ser exibida:

 

Meu codigo: cadastro.asp

 

ASP
<%

 

'Declarando variáveis

Dim adoCon, strCon

Dim caminho_banco

 

'Definindo caminho do banco

caminho_banco = Server.MapPath("datameu_banco.mdb")

 

'Definindo string de conexão

strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho_banco

 

'Criando objeto

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

 

'Abrindo conexão

adoCon.Open strCon

 

Dim Nome,Idade,Cidade,Celular,TelefoneRes,Evangelico,Igreja,DataPag,Obs

 

Nome = trim(Request.Form("Nome_acampante"))

Idade = trim(Request.Form("Idade"))

Cidade = trim(Request.Form("Cidade"))

Celular = trim(Request.Form("Celular"))

TelefoneRes = trim(Request.Form("Telefone_residencial"))

Evangelico = trim(Request.Form("Evangelico"))

Igreja = trim(Request.Form("Igreja"))

DataPag = trim(Request.Form("Data_pagamento"))

Obs = trim(Request.Form("Obs"))

 

 

SQL = "INSERT INTO Acampante(Nome, Idade,Cidade,Celular,Telefone,Evangelico,Igreja,Data_pagamento,Obs)"

 

SQL = SQL + "VALUES('"& Nome &"','"& Idade &"','"& Cidade &"','"& Celular &"','"& TelefoneRes &"','"& Evangelico &"','"& Igreja &"','"& DataPag &"','"& Obs &"');"

 

adoCon.Execute(SQL)

 

'Fechando conexão

adoCon.Close

Response.Redirect "/comprovante.asp"

Set adoCon = Nothing

 

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.