SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Roxi en Viernes 3 de Junio de 2005, 19:05

Título: Error Al Utilizar Adotable
Publicado por: Roxi en Viernes 3 de Junio de 2005, 19:05
Hola, podria alguien ayudarme porfavor...

Estoy utilizando un ADOTable para conectar una base de datos en access pero en el momento de ejecutar la aplicacion aparece  un error que dice: 'Could not convert variant of type (NULL)into type(String)',   :( ...

No se si el error es de la base de datos o del componente que utilizo... El código que utilizo para conectar la base de datos es el siguiente:

DataModule3.ADOTable1.ConnectionString:='Provider=MSDASQL.1;Persist   Security Info=False;Extended Properties="DSN=Proveedor;DBQ=C:\Proveedor.mdb;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;"';
DataModule3.ADOTable1.TableName:='Proveedor';
DataModule3.ADOTable1.Open;
DataModule3.ADOTable1.Active:=true;

Gracias,  :) ...
Título: Re: Error Al Utilizar Adotable
Publicado por: Widark en Viernes 3 de Junio de 2005, 22:47
Hola Roxi!

Yo utilizo ADODB, no se si sea igual primera vez que escucho ADOTable y me coneccto así:

Código: Text
  1. Public Cnx As ADODB.Connection
  2.   Set Cnx = New ADODB.Connection
  3.   Cnx.CursorLocation = adUseClient
  4.   Cnx.Open "PROVIDER=MSDataShape;Data Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & strRuta
  5.  
luego debe abrir el recordset asi:
[CODE]Dim rsProveedor as ADODB.Recordset
set rsProveedor = New ADODB.Recordset
rsProveedor.Open "Select * From [Nombre_Tabla]",cnx,adOpenStatic, adLockOptimistic

espero le ayude, saludos.
Título: Re: Error Al Utilizar Adotable
Publicado por: Roxi en Domingo 5 de Junio de 2005, 00:10
Muchas gracias por la ayuda, aunque sinceramente no me di cuenta de que me habia metido al foro de visual basic y mi duda es en delphi,  :unsure: , gracias de todos modos, sirve de que voy aprendiendo mas de visual basic