
17/05/2002, 08:54
|
| | Fecha de Ingreso: marzo-2002
Mensajes: 99
Antigüedad: 23 años, 1 mes Puntos: 0 | |
Re: asp y flash eSTE ES UNO, EL CUAL ME MUESTRA UN REGISTRO:
<%@Language="VBScript"%>
<%
Dim oRS, oConn
Set oRS = Server.CreateObject("ADODB.Recordset")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.ConnectionString = "dsn=treiber1"
oConn.Open
oRS.Open "SELECT * FROM Employees", oConn, 2, 3
oRS.Find "NameLast = '" & UCase(Request.QueryString("strSearch")) & "'"
If oRS.EOF Then
Response.Write "NameLast=Not+Found&NameFirst=Not+Found&a mp;Position=Not+Found"
Else
Response.Write "NameFirst=" & Server.URLEncode(oRS("NameFirst")) & "&NameLast=" & Server.URLEncode(oRS("NameLast")) & "&Position=" & Server.URLEncode(oRS("Position"))
End If
oRS.Close
Set oRS = Nothing
oConn.Close
Set oConn = Nothing
%> |