Page 1 of 1
ADS en un servidor Novell SB5
Posted: Mon Jun 19, 2006 4:26 pm
by Alvaro Urdaneta
Saludos al foro:
Estoy tratando de utilizar fwh/harbour con ads en un servidor Novell y no se conecta, este es el PRG:
// Harbour Advantage RDD sample
#include "FiveWin.ch"
#include "ads.ch"
REQUEST ADS
//----------------------------------------------------------------------------//
function Main()
rddsetdefault( "ADS", 1 )
REQUEST ADS
SET SERVER REMOTE //LOCAL
SET FILETYPE TO NTX
USE Clientes // Open any DBF...
OrdSetFocus("DIRECCION") // Second Tag on Clientes.cdx
go top
Browse() // Quick browse!!!
USE
return nil
//----------------------------------------------------------------------------//
Mis programas anteriores en clipper/fw/blinker utilizaban sin problemas:
REQUEST DBFNTXAX
RDDSETDEFAULT( "DBFCDXAX" )
y los dll's ADSIPX16.DLL y AXCOMM16.DLL
Que estoy haciendo mal ?, alguien me puede ayudar con esto?
Gracias
Alvaro Urdaneta
Posted: Tue Jun 20, 2006 3:45 pm
by R.F.
Alvaro:
Linkeaste el RDDADS. LIB y el ACE32.LIB a tu programa de 32 bits ?
Donde pusiste las DLLs ACE32.DLL, AXCS32.DLL y ADSLOC32.DLL ?
Que protocolo tienes instalado en el servidor (TCP/IP o IPX/SPX o ambos? )
Tienes instalado NetBeui en los protocolos de tus puestos ?
Haz probado a ver si con el ARC tienes comunicacion con el servidor ?
Posted: Wed Jun 21, 2006 2:03 pm
by Alvaro Urdaneta
Hola Rene:
>Linkeaste el RDDADS. LIB y el ACE32.LIB a tu programa de 32 bits ?
Si
>Donde pusiste las DLLs ACE32.DLL, AXCS32.DLL y ADSLOC32.DLL ?
En la carpeta de la aplicacion
>Que protocolo tienes instalado en el servidor (TCP/IP o IPX/SPX o ambos? )
Ambos
>Tienes instalado NetBeui en los protocolos de tus puestos ?
Si
>Haz probado a ver si con el ARC tienes comunicacion con el servidor ?
No lo tengo instalado
Rene, mis sistemas en fw/clipper/blinker siempre se han conectado, la version de Ads es 5.1, novell Small Business 5, estacion win98 y Xp, el problema es que no puedo conectarlos con fwh/harbour, que me falta?.
este es el build, gacias.
set hdir=f:\harbour
set bcdir=f:\bcc55
%hdir%\bin\harbour %1 /n /i\fwh\include;%hdir%\include /w /p %2 %3 > clip.log
@type clip.log
IF ERRORLEVEL 1 PAUSE
IF ERRORLEVEL 1 GOTO EXIT
echo -O2 -e%1.exe -I%hdir%\include %1.c > b32.bc
%bcdir%\bin\bcc32 -M -c @b32.bc
:ENDCOMPILE
IF EXIST %1.rc %bcdir%\bin\brc32 -r %1
echo c0w32.obj + > b32.bc
echo %1.obj, + >> b32.bc
echo %1.exe, + >> b32.bc
echo %1.map, + >> b32.bc
echo \fwh\lib\FiveH.lib \fwh\lib\FiveHC.lib + >> b32.bc
echo %hdir%\lib\rtl.lib + >> b32.bc
echo %hdir%\lib\vm.lib + >> b32.bc
echo %hdir%\lib\gtwin.lib + >> b32.bc
echo %hdir%\lib\lang.lib + >> b32.bc
echo %hdir%\lib\macro.lib + >> b32.bc
echo %hdir%\lib\rdd.lib + >> b32.bc
echo %hdir%\lib\dbfntx.lib + >> b32.bc
echo %hdir%\lib\dbfcdx.lib + >> b32.bc
echo %hdir%\lib\dbffpt.lib + >> b32.bc
echo %hdir%\lib\hbsix.lib + >> b32.bc
echo %hdir%\lib\debug.lib + >> b32.bc
echo %hdir%\lib\common.lib + >> b32.bc
echo %hdir%\lib\pp.lib + >> b32.bc
echo %hdir%\lib\codepage.lib + >> b32.bc
rem Uncomment these two lines to use Advantage RDD
echo %hdir%\lib\rddads.lib + >> b32.bc
echo %hdir%\lib\Ace32.lib + >> b32.bc
echo %bcdir%\lib\cw32.lib + >> b32.bc
echo %bcdir%\lib\import32.lib + >> b32.bc
echo %bcdir%\lib\psdk\odbc32.lib + >> b32.bc
echo %bcdir%\lib\psdk\nddeapi.lib + >> b32.bc
echo %bcdir%\lib\psdk\iphlpapi.lib + >> b32.bc
echo %bcdir%\lib\psdk\rasapi32.lib, >> b32.bc
IF EXIST %1.res echo %1.res >> b32.bc
rem uncomment this line to use the debugger and comment the next one
rem %bcdir%\bin\ilink32 -Tpe -s @b32.bc
%bcdir%\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
IF ERRORLEVEL 1 GOTO LINKERROR
ECHO * Application successfully built
%1
GOTO EXIT
ECHO
rem delete temporary files
@del %1.c
:LINKERROR
ECHO * There are errors
GOTO EXIT
:SINTAX
ECHO SYNTAX: Build [Program] {-- No especifiques la extensi¢n PRG
ECHO {-- Don't specify .PRG extension
GOTO EXIT
:NOEXIST
ECHO The specified PRG %1 does not exist
:EXIT
Saludos
Posted: Wed Jun 21, 2006 3:16 pm
by R.F.
Los tiros van por el tema del protocolo.... quita el NetBeui deja solo TCP/IP e IPX/SPX.
Asegurate que la trama IPX sea la misma en ambos, cliente y servidor.
Si tienes novell 5.x o superior, quita el protocolo IPX y deja solo TCP/IP
Instala el ARC en tu estacion de trabajo y prueba si tienes conectividad al servidor.
La aplicaciones en Clipper / FW funcinan porque tienen asumido el tema del protocolo, por defaul para las aplicaciones de 16 bits es IPX/SPX, sin embargo para las aplicaciones de 32 bits hay que trabajar un poco mas con la configuracion de la red.