Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/02/2009, 14:24
ind4rk
 
Fecha de Ingreso: febrero-2009
Mensajes: 17
Antigüedad: 16 años, 2 meses
Puntos: 0
Respuesta: IIS + MYSQL remoto

Esto es la ostia ¬¬

Código:
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRecordset =Server.CreateObject("ADODB.RecordSet")
Conexion = "Driver={MySQL ODBC 5.1 Driver};Server=wwww;Database=www;User=www;Password=www;Port=3307;Option=3;"
oConn.Open Conexion

Set oRecordset = oConn.Execute("SELECT * FROM USUARIOS") 
count = oRecordset.fields.count 

set rs=Server.CreateObject("ADODB.recordset")
rs.Open "Select * from USUARIOS", oConn

for each x in rs.fields
   response.write(x.name)
  ' response.write(x.value)
next



Response.Write(count)

oConn.close
--- Esto funciona

Código:
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRecordset =Server.CreateObject("ADODB.RecordSet")
Conexion = "Driver={MySQL ODBC 5.1 Driver};Server=wwww;Database=www;User=www;Password=www;Port=3307;Option=3;"
oConn.Open Conexion

Set oRecordset = oConn.Execute("SELECT * FROM USUARIOS") 
count = oRecordset.fields.count 

set rs=Server.CreateObject("ADODB.recordset")
rs.Open "Select * from USUARIOS", oConn

for each x in rs.fields
   response.write(x.name)
   response.write(x.value)
next



Response.Write(count)

oConn.close
---Esto no funciona
y solo descomento esta linea response.write(x.value)