20/06/2008, 11:44
|
| | | Fecha de Ingreso: abril-2005 Ubicación: chihuahua Mexico
Mensajes: 49
Antigüedad: 20 años Puntos: 0 | |
| Respuesta: Codigo raro rarisimo
ok mi estimado juan escribio
IDDDDD:22lleno
y el codigo lo puse:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open"driver={MySQL ODBC 3.51 Driver};Server=localhost;Port=3306;Database=pagina ;Uid=xxxxPwd=xxxx"
sql="select id_usuario,id_vacante,fecha_usuario_aplico as fecha from aspirantes_aplicaron where id_vacante="&session("vacante_aplicar")&" and id_usuario="&session("usuario_usr")
set rt=conn.execute(sql)
if rt.EOF and rt.Bof then
response.Write("vacio")
sql="insert into aspirantes_aplicaron(id_usuario,id_vacante,fecha_u suario_aplico)values("&session("usuario_usr")&","& session("vacante_aplicar")&",curdate())"
conn.execute(sql)
else
response.write("IDDDDD:"&rt("id_usuario"))
response.Write("lleno" )
end if
%>
</body>
</html> |