Ir para conteúdo

POWERED BY:

Arquivado

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

Ted k'

[Resolvido] Cadastrando, Listando e Deletando com AJAX / ASP

Por , em ASP Clássico

Recommended Posts

Ted k'    126

Ted k'
Postado

Código bem simples e útil para a galera que gosta de usar AJAX e não tem muita referência!

 

 

Página para carregar o AJAX, funcionalidades:

 

ajaxCarregar.js

function GetXMLHttp() {
	var xmlHttp;
	try {
		xmlHttp = new XMLHttpRequest();
	}
	catch(ee) {
		try {
			xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");
		}
		catch(e) {
			try {
				xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
			}
			catch(e) {
				xmlHttp = false;
			}
		}
	}
	return xmlHttp;
}

 

Cadastro.asp

<%@ Language="JavaScript" %>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Cadastrar</title>
<script language="javascript" src="ajaxCarregar.js"></script>
<script language="javascript">

function CadastrarDados() {
	var Enviar = GetXMLHttp();
	var Nome = document.getElementById("Nome").value;
	var EMail = document.getElementById("EMail").value;
	var URL = "Cadastro.asp?Cadastrar=Ok&Nome="+Nome+"&EMail="+EMail+"";
	
	Enviar.open("GET", URL, true);
	Enviar.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
		with (document) {
			getElementById("Resposta").innerHTML = "Cadastrado com Sucesso!!!";
			getElementById("Nome").value = "";
			getElementById("EMail").value = "";
		}
	Enviar.send(null);
}
</script>
</head>
<body>
<div id="Resposta"></div><br>
<form id="Form">
	Nome: <input type="text" id="Nome" name="Nome" value=""><br>
	E-Mail: <input type="text" id="EMail" name="EMail" value=""><br>
	<input type="button" id="Cadastrar" value="Cadastrar" name="Cadastrar" onClick="CadastrarDados();">
</form>
</body>
</html>
<%
if (Request.QueryString("Cadastrar") == "Ok") {
	var Conexao;
	var Conexao = Server.CreateObject("Adodb.Connection");
	Conexao.ConnectionString = "Driver=MySQL ODBC 3.51 Driver; DataBase=banco; Server=localhost; Uid=; PassWord=;";
	Conexao.Open;
	
	Conexao.Execute("Insert Into Teste (Nome, EMail) Values ('"+Request.QueryString("Nome")+"', '"+Request.QueryString("EMail")+"')");
	Response.Write("");
}
%>

Tem o código completo no blog, dúvidas pode postar aqui no fórum!!!

Link: Ted k' .blog

No meu blog deixei a parte do Listar e Deletar, que testei no IE7 e no FF

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito