
22/11/2004, 10:46
|
 | | | Fecha de Ingreso: septiembre-2004 Ubicación: Barranquilla
Mensajes: 568
Antigüedad: 20 años, 7 meses Puntos: 0 | |
linkeos ahora bien tengo unas vacunas que las traigo de las bases de datos y pues hago algo asi:
<%
Dim oConn,strSQL, objRS,i,j,color,s
Dim a,b:Date
s=Session("Color")
Set oConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject ("ADODB.RecordSet")
oConn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};Server=127.0.0.1;uid=root;DataBase=datos1"
oConn.Open
strSQL="SELECt * from det_vacuna where vacuna not in(select codi from det1_vacuna) "
Set objRS=OConN.Execute(strSQL)
%>
<CENTER>
<form name=myform method=post action=ingresar.asp>
<TABLE BORDER=1 CELLSPACING=2 CELLPADDING=2 text=green>
<TR><TD> <center><b><font face= comic sans ms color=green>Vacunas</font><b></center></TD><TD> <center><b><font face= comic sans ms color=green><center>Numero de Dosis</center></font></center></TD><TD> <center><b><font face= comic sans ms color=green><center>Estado</center></font></center> </td></tr>
<%
while (not objRS.Eof)
Response.Write("<tr bgColor=" & color & "><td> " & "<center>" & objRS("nom_vacuna") & "</td><td> <center>" & objRS("num_dosis") & "<center>" & "</td><td> " & "<center>" & "<input name=button type=button onClick=""javascript:ventanaSecundaria('ordenvacu. asp');close();"" value=""Orden de Vacunacion"">" & "</td></tr>")
objRS.MoveNext
wend
oConn.Close
set objRS = nothing
set oConn = nothing
%>
</table>
<HEAD>
<script language="JavaScript">
function ventanaSecundaria (URL){
window.open(URL,"ventana1","width=500, height=450, scrollbars=no, menubar=no, location=no, resizable=no,toolbar=no")
}
</script>
</HEAD>
</body>
y pues la cuestion es que necesito que cuando le de click al boton pues en la poput me recoja o aparezca el nombre de la vacuna y la dosis respectiva como lo hago para mandar esos parametros a la popup, para que acepte esa vacuna y esa dosis.
__________________ Solo el que se basa en conocimiento basico y cultiva el aprendizaje obtendra sabiduria |