Que tal.. requiero hacer una conexion a una Base de datos.. pero solo requiero recuperar los nombres de los campos.. de dicha tabla... mas no lo registros..
cual es la sentencia ?
gracias
| |||
Sentencia SQL Que tal.. requiero hacer una conexion a una Base de datos.. pero solo requiero recuperar los nombres de los campos.. de dicha tabla... mas no lo registros.. cual es la sentencia ? gracias |
| ||||
Esto es para una tabla con VB. el valor de un campo con fields.value ...el nombre es fields.name saludos Set rst = dbsAct.OpenRecordset("SCINIT", dbOpenDynaset) NROCAMPOS = rst.Fields.Count For i = 1 To NROCAMPOS If i = 1 Then cadena = cadena + "?" Else cadena = cadena + ",?" End If Next Set qryMyQuery3 = cntAS400.CreateQueryDef("", "INSERT INTO SCINIT VALUES( " + cadena + ")") With rst .MoveFirst Do While Not .EOF For i = 1 To NROCAMPOS j = i - 1 var = NoNull(rst.Fields(j).Value) If var = "" Then qryMyQuery3(j) = 0 Else qryMyQuery3(j) = rst.Fields(j).Value End If Next qryMyQuery3.Execute .Edit rst.Update .MoveNext Loop .Close End With
__________________ http://paracraneo.comlu.com |