24/04/2006, 10:13
|
| | | Fecha de Ingreso: agosto-2005
Mensajes: 221
Antigüedad: 19 años, 8 meses Puntos: 4 | |
Vale me sigue dando error. Asiq para no marearte te pondre todo el codigo q tengo en esta página. Aunq igual te mareo aun mas.. Cita: <!doctype html public "-//w3c//dtd html 3.2//en">
<html>
<head>
<title>(Type a title for your page here)</title>
<%@ LANGUAGE=JScript %>
<meta name="GENERATOR" content="Arachnophilia 4.0">
<meta name="FORMATTER" content="Arachnophilia 4.0">
<form action="Equipos1.asp" METHOD =POST>
</script>
</head>
<body bgcolor="#ffffff" text="#000000" link="#0000ff" vlink="#800080" alink="#ff0000">
<%
conexion20= new ActiveXObject("ADODB.Connection")
registro20=new ActiveXObject("ADODB.Recordset")
conexion20.Open ("datos")
Fnc_Sql = "Select * from 902_DATOS_GENERALES "
registro20.Open (Fnc_Sql, conexion20, 3, 0x0002)
%>
<%
conexion21= new ActiveXObject("ADODB.Connection")
registro21=new ActiveXObject("ADODB.Recordset")
conexion21.Open ("datos")
Fnc_Sql = "Select * from 910_ENTORNO_SIS_OPERATIVO "
registro21.Open (Fnc_Sql, conexion21, 3, 0x0002)
%>
<%
conexion22= new ActiveXObject("ADODB.Connection")
registro22=new ActiveXObject("ADODB.Recordset")
conexion22.Open ("datos")
Fnc_Sql = "Select * from 912A_TIPO_RED_LOCAL "
registro22.Open (Fnc_Sql, conexion22, 3, 0x0002)
%>
<%
conexion23= new ActiveXObject("ADODB.Connection")
registro23=new ActiveXObject("ADODB.Recordset")
conexion23.Open ("datos")
Fnc_Sql = "Select * from 912B_RED_CORPORATIVA "
registro23.Open (Fnc_Sql, conexion23, 3, 0x0002)
%>
<%
conexion24= new ActiveXObject("ADODB.Connection")
registro24=new ActiveXObject("ADODB.Recordset")
conexion24.Open ("datos")
Fnc_Sql = "Select * from 912C_OTRAS_REDES "
registro24.Open (Fnc_Sql, conexion24, 3, 0x0002)
%>
<%
conexion112= new ActiveXObject("ADODB.Connection")
registro112=new ActiveXObject("ADODB.Recordset")
conexion112.Open ("datos")
Fnc_Sql = "Select * from 902_DATOS_GENERALES "
registro112.Open (Fnc_Sql, conexion112, 3, 0x0002)
%>
<input type=text value=<% registro112.MoveLast()
%>
<%=registro112("IdEmpresa")%>
name="IdEmpresa112" >
<%
conexion93= new ActiveXObject("ADODB.Connection")
registro93=new ActiveXObject("ADODB.Recordset")
conexion93.Open ("datos")
Fnc_Sql = "Select NombreDelegacion from 904_DELEGACIONES_DE_EMPRESA where IdEmpresa= '" & Request.form("IdEmpresa112") & "'"
registro93.Open (Fnc_Sql, conexion93, 3, 2)
%>
<br>
<center>
<h3>EQUIPOS INFORMÁTICOS CON ACCESO A DATOS</h3>
</center>
<br>
Id de Empresa es
<% registro20.MoveLast()
{%>
<%=registro20("IdEmpresa")%>
<%
}
%>
<br>
Empresa:
<% registro20.MoveLast()
{%>
<%=registro20("Empresa")%>
<%
}
%>
<br>
<input type=text value=<% registro20.MoveLast()
{%>
<%=registro20("IdEmpresa")%>
name="IdEmpresa20" style="visibility:hidden">
<br>
<input type=text value=
<%=registro20("Empresa")%>
<%
}%> name="20" style="visibility:hidden">
<br>
<h3>Nombre de delegacion :
<select name= "id_delegacion">
<% while (!registro93.eof)
{ %>
<option value="<%=registro93 ("NombreDelegacion") %>">
<%=registro93 ("NombreDelegacion")%>
<%registro93.Movenext();
}
registro93.close()
conexion93.close()
%>
</select>
<br>
<br>
<h3>Ref
<input type=text name="refinfor">
<br>
<h3>Tipo equipo informático
<input type=text name="tipoinfor">
<br>
<h3>Marca
<input type=text name="marcainfor">
<br>
<h3>Modelo
<input type=text name="modeloinfor">
<br>
<h3>Serie del equipo
<input type=text name="serieinfor">
<br>
<h3>Uso genérico
<input type=text name="usoinfor">
<br>
<h3>Seguridad integrada en el equipo:
<input type=text name="seginfor">
<br>
<h3>Responsable del mantenimiento:
<input type=text name="respinfor">
<br>
<h3>Usuario Responsable:
<input type=text name="usuinfor">
<br>
<h3>Descripción S.O. :
<select name= "desso">
<% while (!registro21.eof)
{ %>
<option value="<%=registro21 ("DescripcionSO") %>">
<%=registro21 ("DescripcionSO")%>
<%registro21.Movenext();
}
registro21.close()
conexion21.close()
%>
</select>
<br>
<h3>Red local :
<select name= "destip">
<% while (!registro22.eof)
{ %>
<option value="<%=registro22 ("DescTipRedLocal") %>">
<%=registro22 ("DescTipRedLocal")%>
<%registro22.Movenext();
}
registro22.close()
conexion22.close()
%>
</select>
<br>
<h3>Red Corporativa :
<select name= "destipcorp">
<% while (!registro23.eof)
{ %>
<option value="<%=registro23 ("DescTipRedCorp") %>">
<%=registro23 ("DescTipRedCorp")%>
<%registro23.Movenext();
}
registro23.close()
conexion23.close()
%>
</select>
<br>
<h3>Otras redes locales :
<select name= "destipotra">
<% while (!registro24.eof)
{ %>
<option value="<%=registro24 ("DescTipOtraRed") %>">
<%=registro24 ("DescTipOtraRed")%>
<%registro24.Movenext();
}
registro24.close()
conexion24.close()
%>
</select>
<br>
<h3>Recursos Compartidos:
<input type=text name="recurinfor">
<br>
<h3>Proveedor Internet:
<input type=text name="provinfor">
<br>
<h3>Línea Acceso:
<input type=text name="lineainfor">
<br>
<br>
<br>
<input type="submit" value="ALTA">
</form>
</body>
</html> |