Visual Basic - consulta error de data.fields!!!

Life is soft - evento anual de software empresarial
   
Vista:

consulta error de data.fields!!!

Publicado por ricardo vera (10 intervenciones) el 16/04/2011 15:40:48
HOLA AMIGOS, TENGO EL ERROR EN ESTAS SENTENCIA RESPECTO AL USO DEL .FIELDS, EM ARROJA PROBLEMAS DE LIBRARY AL UTILIZARLA, ESTAS SON LAS SENTENCIAS.

GRACIAS


db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Password='';User ID=;Data

Source=c:\paqitsa\datos_paq\dB1.mdb ;Mode=Share Deny None;Extended Properties='';Jet OLEDB:System database='';Jet OLEDB:Registry Path='';Jet OLEDB:Database Password='';Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password='';Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False"


Set conp = db.Execute("select * from proveedores order by nombre_prov")
If conp.EOF = True Then
MsgBox "No existen datos de Proveedores. Debe ingresarlos primero"
Unload Me
Else
Do Until conp.EOF = True
entry = conp.Fields("NOMBRE_PROV")*********************************ERROR
Combo1.AddItem entry
conp.MoveNext


END IF
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder