Tienes razón
antbrosio, la forma para que regrese los mismos datos es esta:
Código:
<!--#include virtual="/SicoiWeb/Conexion.asp"-->
<!-- #INCLUDE virtual="/SicoiWeb/adovbs.inc" -->
<%
Set cmd=server.CreateObject("ADODB.command")
Set cmd.ActiveConnection = Con
' cmd.CommandText = "select * from clientes where codigocliente like '%pemsa%'"
cmd.CommandText = "select * from clientes where codigocliente like ?"
cmd.CommandType=adCmdText
cmd.Parameters.Append cmd.CreateParameter(,adVarchar, adParamInput, 13, "%PEMSA%")
cmd.Prepared = True
set rs = Server.CreateObject("adodb.recordset")
set rs = cmd.Execute
%>
<table border=1>
<%
while not rs.eof
%><tr><%
for i=0 to rs.fields.count-1
%><td><%=rs(i)%><%
next
rs.movenext
wend
%>
</table>
saludos!!