31/08/2010, 16:38
|
| | | Fecha de Ingreso: julio-2007
Mensajes: 58
Antigüedad: 17 años, 9 meses Puntos: 0 | |
| generar recorset y dejarlos en un arreglo
estimados,
necesito ayuda con este iten.
necesito traer registros de mi base de datos y dejarlos en un arreglo, el problema es que tengo que usar redim preserve y no se como se usa, me pueden hechar una amano.
m conexion esta lista
set objRS = Server.CreateObject("ADODB.Recordset")
objRS.open "SELECT distinct person1euid from pub.journal order by person1euid asc", oConn
'for each campo in objRS.fields
'response.write("<td><b>" & campo.name & "</b></td>"&"<br>")
'next
dim objRS
dim tabid()
redim tabid(10)
'val =100
valores = objRS.GetRows |