Por suerte el driver de Paradox viene con Windows sólo tendrías que
crearte un DSN o usar la misma cadena de conexión que con ADO
Carlos Sincuir escribió:
> Manu, por fin di con el clavo. Ya logre accesar las tablas de Pardox 7.x con
> este string de conexión para ADO:
>
> strConecta := "Driver={Microsoft Paradox Driver (*.db )};"+;
> "collatingsequence=ASCII;"+;
> "dbq=C:DatosSAE4.0;"+;
> "defaultdir=C:DatosSAE4.0;"+;
> "driverid=538;"+;
> "fil=Paradox 7.X;"+;
> "paradoxnetpath=c:temp;"+;
> "paradoxnetstyle=4.x;"+;
> "paradoxusername=admin;"+;
> "safetransactions=0;"+;
> "threads=3;"+;
> "uid=admin;"+;
> "usercommitsync=Yes"
>
> Ahora te quiero preguntar como le hago con Condor1 si no tengo un driver
> ODBC instalado?
>
> Saludos.
>
> Carlos.
>
> "Manu" <
messoft@gmail.com> escribió en el mensaje
> news:[email=
46536988@ozsrv2.ozlan.local...]
46536988@ozsrv2.ozlan.local...[/email]
>> Muy bien Carlos... cuenta con mi ayuda en lo que necesites.
>>
>> Carlos Sincuir escribió:
>>> Manu, fijate que según una nota que me envio Felix Baxajaun, en esta
>>> dirección
http://msdn2.microsoft.com/en-us/library/aa155774 se puede ver
>>> que es necesario disponer de Borland Database Engine (BDE 4.x o superior)
>>> para poder acceder a Paradox 7 a través del Microsoft JET.
>>>
>>> Yo si puede accesar a tablas de Paradox, pero de la 4.x/5.x sin ningun
>>> problema, pero ahora necesito hacer la conexión a Paradox 7.x, ya que un
>>> cliente me esta pidiendo que le haga unos reportes por separado para un
>>> sistema ASPEL SAE 4.0, y este trabaja con tablas de Paradox 7.x
>>>
>>> Creo haer leído tambien que Miguel Angel estaba haciendo ese RDD, voy a
>>> ver si lo contacto para preguntarle al respecto.
>>>
>>> Igualmente voy a buscar sobre el BDE 4.x, y si logro hacer la conexión lo
>>> trabajaría con Condor1. Yo te cuento como me va, o te envío algun ejemplo
>>> para ponerlo en el foro de Condor1.
>>>
>>> Saludos.
>>>
>>> Carlos Sincuir
>>>
>>>
>>>
>>> "Manu" <
messoft@gmail.com> escribió en el mensaje
>>> news:4653363c$[email=
1@ozsrv2.ozlan.local...]
1@ozsrv2.ozlan.local...[/email]
>>>> Si no me falla la memoria M$ tiene uno pero no sé con qué versiones
>>>> funciona... en su día hice pruebas con Condor1 y me iba bien
>>>>
>>>> Por otro lado también decirte que Miguel Angel Marchuet está haciendo
>>>> una RDD para Paradox y será nativo en (x)Harbour
>>>>
>>>> Si nos estás leyendo M. Angel... cómo va la RDD?
>>>>
>>>> Carlos Sincuir escribió:
>>>>> Hola Manu.
>>>>> Fijate que lo pense, pero igual necesito el driver ODBC, y como le
>>>>> indicaba a Martin, no encuentro ninguno, sabes tu donde puedo
>>>>> encontrarlo o es que no he buscado bien?
>>>>>
>>>>> Saludos.
>>>>>
>>>>> Carlos Sincuir
>>>>>
>>>>> "Manu" <
messoft@gmail.com> escribió en el mensaje
>>>>> news:[email=
4652d012@ozsrv2.ozlan.local...]
4652d012@ozsrv2.ozlan.local...[/email]
>>>>>> Carlos has probado con Condor1?
>>>>>>
>>>>>> Carlos Sincuir escribió:
>>>>>>> Hola Martin, gracias por contestarme.
>>>>>>> Fijate que prove tu conexión, pero me sigue dando el mismo error
>>>>>>> cuando le doy el open al recordset:
>>>>>>>
>>>>>>> "Error La Tabla externa no tiene el formato esperado.:
>>>>>>> OPEN"
>>>>>>>
>>>>>>> Ese mismo error me daba con la anterio cadena de conexión.
>>>>>>>
>>>>>>> Esto es lo que estoy haciendo:
>>>>>>>
>>>>>>> ///Codigo.....
>>>>>>> LOCAL strConecta
>>>>>>> LOCAL oConexionAdo := TOLEAUTO():New("adodb.connection")
>>>>>>> LOCAL oRecordset := TOLEAUTO():New("adodb.recordset")
>>>>>>> LOCAL oCommand := TOLEAUTO():New("adodb.command")
>>>>>>>
>>>>>>> strConecta = "Provider=Microsoft.Jet.OLEDB.4.0;" +;
>>>>>>> "Password='';User ID=Admin;" +;
>>>>>>> "Data Source=C:DatosSAE4.0;" +;
>>>>>>> "Mode=Share Deny Write;" +;
>>>>>>> "Extended Properties='';" +;
>>>>>>> "Jet OLEDB:System database='';" +;
>>>>>>> "Jet OLEDB:Registry Path='';" +;
>>>>>>> "Jet OLEDB:Database Password='';" +;
>>>>>>> "Jet OLEDB:Engine Type=82;" +;
>>>>>>> "Jet OLEDB:Database Locking Mode=0;" +;
>>>>>>> "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"
>>>>>>>
>>>>>>> oConexionAdo:Open(strConecta) //Todo bien supuestamente
>>>>>>>
>>>>>>> oRecordSet:LockType := adLockOptimistic
>>>>>>> oRecordSet:CursorType := adOpenKeyset
>>>>>>> oRecordSet:ActiveConnection(oConexionAdo)
>>>>>>> oRecordSet:Source := "Select * from clientes"
>>>>>>> oRecordSet:Open() //<---- Aca es donde obtengo el error que
>>>>>>> escribí arriba.
>>>>>>>
>>>>>>> Seguiré busando y si tienes otra idea de que puede estar pasando te
>>>>>>> lo agradecería me la comentes.
>>>>>>>
>>>>>>> Saludos.
>>>>>>>
>>>>>>> Carlos Sincuir
>>>>>>>
>>>>>>> "Martin del Angel" <
martindelangel@msn.com> escribió en el mensaje
>>>>>>> news:46521433$[email=
1@ozsrv2.ozlan.local...]
1@ozsrv2.ozlan.local...[/email]
>>>>>>>> Hola Carlos !
>>>>>>>>
>>>>>>>> Intenta esta cadena:
>>>>>>>>
>>>>>>>> strConecta = "Provider=Microsoft.Jet.OLEDB.4.0;" +;
>>>>>>>> "Password='';User ID=Admin;" +;
>>>>>>>> "Data Source=" + RUTA_TABLAS + ";" +;
>>>>>>>> "Mode=Share Deny Write;" +;
>>>>>>>> "Extended Properties='';" +;
>>>>>>>> "Jet OLEDB:System database='';" +;
>>>>>>>> "Jet OLEDB:Registry Path='';" +;
>>>>>>>> "Jet OLEDB:Database Password='';" +;
>>>>>>>> "Jet OLEDB:Engine Type=82;" +;
>>>>>>>> "Jet OLEDB:Database Locking Mode=0;" +;
>>>>>>>> "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"
>>>>>>>>
>>>>>>>> Saludos.....
>>>>>>>>
>