Page 1 of 2
Error al compilar con VS2019
Posted: Wed Apr 05, 2023 7:54 pm
by acuellar
Buenas Estimados
Me sale éste error al compilar con VS2019
Code: Select all | Expand
LINK : fatal error LNK1000: Internal error during LIB::Search
Que puede ser?
Gracias por la ayuda
Re: Error al compilar con VS2019
Posted: Wed Apr 05, 2023 8:19 pm
by karinha
Re: Error al compilar con VS2019
Posted: Wed Apr 05, 2023 10:21 pm
by acuellar
Gracias Estimado Joao
Nada
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 6:41 am
by jvtecheto
Hola amigo.
Que versión de FWH 32 o 64 bits?
Te refieres a los ejemplos de FWH ?
Si es un proyecto, compilas con Fivedit o hbmk2?
Mi experiencia con 32 bits FWH:
Los ejemplos de FWH . Ok
Hbmk2 . Ok.
Fivedit . Error (podría ser que yo tengo versión Enterprise). Si alguien pudiera postear que le funciona bien , que no sea Cristóbal que a él siempre le va bien [emoji38][emoji1787] )
Saludos
Jose
Enviado desde mi Lenovo TB-J606F mediante Tapatalk
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 6:48 am
by Antonio Linares
Estimado Adhemar,
Vuelve a correr el instalador de VS2019 y selecciona la opción reparar
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 12:11 pm
by acuellar
Estimados
Muchas gracias por responder
Tengo la versión portable de VS2019
Descargar de aquí
https://drive.google.com/file/d/1EmHXCJ ... share_link
Si alguien tiene la VS2022 portable si puede, que la comparta porfa.
Gracias por la ayuda
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 12:29 pm
by karinha
32 ó 64 Bits?
Regards, saludos.
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 2:18 pm
by acuellar
Es 32Bit Estimado Joao
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 3:05 pm
by karinha
acuellar wrote:Es 32Bit Estimado Joao
Estimado Adhemar esta Descarga, mi Antivirus o Windows bloqueó la descarga, algo anda mal con esta versión 2019, mejor descargue otra y vuelva a instalar. Por seguridad.
Regards, saludos.
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 3:11 pm
by acuellar
Gracias Estimado Joao
Estoy buscando la VS2022
Espero alguien la comparta.
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 4:29 pm
by karinha
Estimados, a ver si uno de estos dos archivos funciona.
https://mega.nz/file/BQF1hTTa#aB2M8rakt ... NgLlLH3sN0
Regards, saludos.
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 7:54 pm
by acuellar
Lo logré
Instalando el VS Community 2022
Con el .bat
Code: Select all | Expand
call "%ProgramFiles%\Microsoft Visual Studio\2022\Community\VC\Auxiliary\Build\vcvarsall.bat" x86
D:\Sistemas\Compiler\HarbourVS\bin\hbmk2 data\prg\proyectoVS.hbp -comp=msvc -run
Intentaré hacerlo portable para no tenerlo instalado
Me salió éste error: warning C4996: 'inet_addr': Use inet_pton() or InetPton() instead or defin
En ésta función
Code: Select all | Expand
#pragma BEGINDUMP
#include <hbapi.h>
#include <winsock2.h>
#include <iphlpapi.h>
#include <icmpapi.h>
int hb_Ping( const char * cp )
{
HANDLE hIcmpFile;
unsigned long ipaddr;
DWORD dwRetVal;
char SendData[32] = "Data Buffer";
LPVOID ReplyBuffer;
DWORD ReplySize;
ipaddr = inet_addr( cp ); //El error lo da en ésta línea
if (ipaddr == INADDR_NONE)
return 1;
hIcmpFile = IcmpCreateFile();
if (hIcmpFile == INVALID_HANDLE_VALUE)
return 2;
ReplySize = sizeof(ICMP_ECHO_REPLY) + sizeof(SendData);
ReplyBuffer = (VOID*) malloc(ReplySize);
if (ReplyBuffer == NULL)
return 3;
dwRetVal = IcmpSendEcho(hIcmpFile, ipaddr, SendData, sizeof(SendData),
NULL, ReplyBuffer, ReplySize, 1000);
if (dwRetVal == 0)
return 4;
return 0;
}
HB_FUNC( HB_PING )
{
hb_retni( hb_Ping( hb_parc( 1 ) ) );
}
#pragma ENDDUMP
Y éstos otros:
hbct.lib(dattime3.obj) : error LNK2005: ya se definió _HB_FUN_SETTIME en fivehc32.lib(DATETIME.obj)
hbct.lib(dattime3.obj) : error LNK2005: ya se definió _HB_FUN_SETDATE en fivehc32.lib(DATETIME.obj)
En ésta función:
Code: Select all | Expand
Function FtpFecha(cFile,cFtpSite,cUsuario,cPass)
oInt:=tInternet():New()
oFtp:=tFtp():New(cFtpSite,oInt,cUsuario,cPass)
IF !Empty(oFtp:hFtp)
aFiles:=oFtp:Directory(cFile)
IF Len(aFiles)>0
HoraNew:= aFiles[1,4]
FtpFecExeNew:=dToS(aFiles[1,3])+Left(HoraNew,2)+Subs(HoraNew,4,2)+Right(HoraNew,2)
Endif
Else
FtpFecExeNew:=""
EndIf
Return FtpFecExeNew
Por ahora las he puesto en comentario
Gracias por la ayuda
Re: Error al compilar con VS2019
Posted: Thu Apr 06, 2023 8:08 pm
by karinha
Re: Error al compilar con VS2019
Posted: Fri Apr 07, 2023 7:19 pm
by acuellar
Muchas gracias Estimado Joao
Hice _ que indican pero no funcionan
Como es un warning no hay problema
Que parámetro o flag se pone en el .HBP para que no muestre los warning?
En la otra función, lo que hace es verificar la fecha y hora del SISTEMA.EXE que coloco en el FTP si es diferente al en ejecución lo actualiza.
He realizado _, sin obtener buen resultado.
Code: Select all | Expand
//He cambiado
oInt:=tInternet():New()
oFtp:=tFtp():New(cFtpSite,oInt,cUsuario,cPass)
//Por éstas que no dan error
oCon:=Turl():New("ftp://"+cusuario+":"+cpass+"@"+cftpsite)
oFTP:=TIpClientFtp():New(oCon, .T.)
//En ésta me da error
aFiles:=oFtp:Directory(cFile) //cFile es SISTEMA.EXE
//Como se carga la tabla con el archivo? para obtener su fecha y hora
Gracias por la ayuda
Re: Error al compilar con VS2019
Posted: Fri Apr 07, 2023 10:24 pm
by karinha