Tema: asp y flash
Ver Mensaje Individual
  #3 (permalink)  
Antiguo 17/05/2002, 08:54
VAMP_01
 
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
%>