Hola Aqui les pongo el codigo si Quieren usar debes de vbScript el Propio JavaScript con ASP con la Aplicacion Aplication Look
Formulario de Ingreso
<%@ LANGUAGE = JScript %>
<%
//autor Erik Blanco Bates
//Fecha 22/02/2007
var nombres = String(Request.Form("nombres"));
var departamento = String(Request.Form("departamento"));
var sueldo = String(Request.Form("sueldo"));
if (nombres!="undefined") {
Application.Lock();
Application("nombres") = nombres;
Application("departamento") = departamento;
Application("sueldo") = sueldo;
Application.UnLock();
Response.Redirect("pagina2.asp");
}
%>
<html>
<head>
<title>Ingreso De Empleados</title>
</head>
<body>
<form method="post" action="pagina1.asp">
<br>
Nombre :
<input type="text" name="nombres" value="">
<br>
Departamento :
<input type="text" name="departamento" value="">
<br>
Sueldo :
<input type="text" name="sueldo" value="">
<input type="submit" value="Guardar">
</form>
</body>
</html>
Y el Codigo de guardado Queda de la Siguiente Forma
<%@ LANGUAGE = JScript %>
<%
// conexion de base asp and javascript
//Declaro el Objeto Ado para la Conexion de BD
var ADOConn = new ActiveXObject("ADODB.Connection");
//Declaro la Variable
var strConn = "";
var sql="";
var ris="";
// Creo la Cadena de Conexion
strConn += "Driver={SQL SERVER};Descripcion=Portal;Server=10.0.0.15;UID=In tranet;PWD=10002netintra;Database=Dolphin";
// Abro la Base de Datos
ADOConn.Open(strConn);
Response.write(sql);
sql = "insert into ZEmpleados";
sql += "(nombres,departamento,sueldo)";
sql += "Values";
sql += "('"+Application("nombres")+"'";
sql += ",'"+Application("departmaento")+"'";
sql += ",'"+Application("sueldo")+"')";
ris = ADOConn.Execute(sql);
// Cierro la Conexion
ADOConn.Close();
%>
<html>
<head>
<title>Ingreso De Usuario</title>
</head>
<body>
<p>Nombre: <b><%=Application("nombres")%></b></p>
<p>Departamento: <b><%=Application("departamento")%></b></p>
<p>Sueldo : <b><%=Application("sueldo")%></b></p>
</body>
</html>
Espero Que alguien le Sirva
Erik Blanco
