Cuando intento compilar este codigo con Harbour y MVC 2010 me salen estos mensajes de error y warnings, este corresponde a el tema de actualizacion de aplicaciones en la pagina de bieelsys http://bielsys.blogspot.com/2009/02/actualizacion-automatica-de.html
- Code: Select all Expand view
#pragma BEGINDUMP
#include <Windows.h>
#include <mapiwin.h>
#include <hbapi.h>
//nTime 1=Last Update, 2=Last Acces, 3=Creation, defecto last update
HB_FUNC( FILETIMES ) // params cFileName, nTime --> { nYear, nMonth, nDay, nHour, nMin, nSec }
{
// LPSTR cFileName = hb_parc( 1 ) ; NMM
LPSTR cFileName = ( LPSTR ) hb_parc( 1 ) ;
int nTime = ( HB_ISNUM( 2 ) ? hb_parni( 2 ) : 1 ) ; // defaults to 1
FILETIME ftCreate, ftAccess, ftWrite ;
SYSTEMTIME stTime ;
// BOOL bRet ;
HANDLE hFile = CreateFile( cFileName, GENERIC_READ, FILE_SHARE_READ, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0 ) ;
if( ! hFile )
return ;
GetFileTime( (HANDLE) hFile, &ftCreate, &ftAccess, &ftWrite ) ;
switch( nTime )
{
case 1 : // last update
FileTimeToSystemTime( &ftWrite, &stTime ) ;
break ;
case 2 : // last access
FileTimeToSystemTime( &ftAccess, &stTime ) ;
break ;
case 3 : // creation
FileTimeToSystemTime( &ftCreate, &stTime ) ;
break ;
default : // last update
FileTimeToSystemTime( &ftWrite, &stTime ) ;
break ;
}
SystemTimeToTzSpecificLocalTime( NULL, &stTime, &stTime ) ;
CloseHandle( hFile ) ;
hb_reta( 6 ) ;
hb_storvni( stTime.wYear, -1, 1 ) ;
hb_storvni( stTime.wMonth, -1, 2 ) ;
hb_storvni( stTime.wDay, -1, 3 ) ;
hb_storvni( stTime.wHour, -1, 4 ) ;
hb_storvni( stTime.wMinute, -1, 5 ) ;
hb_storvni( stTime.wSecond, -1, 6 ) ;
}
#pragma ENDDUMP
#define FA_RDONLY 1 /* R */
#define FA_HIDDEN 2 /* H */
#define FA_SYSTEM 4 /* S */
#define FA_LABEL 8 /* V */
#define FA_DIREC 16 /* D */
#define FA_ARCH 32 /* A */
#define FA_NORMAL 0
HB_FUNC(FILESIZE)
{
LPCTSTR szFile;
DWORD dwFlags=FILE_ATTRIBUTE_ARCHIVE;
HANDLE hFind;
WIN32_FIND_DATA hFilesFind;
int iAttr;
if (hb_pcount() >=1){
szFile=hb_parc(1);
if (HB_ISNUM(2)) {
iAttr=hb_parnl(2);
}
else{
iAttr=63;
}
if( iAttr & FA_RDONLY )
dwFlags |= FILE_ATTRIBUTE_READONLY;
if( iAttr & FA_HIDDEN )
dwFlags |= FILE_ATTRIBUTE_HIDDEN;
if( iAttr & FA_SYSTEM )
dwFlags |= FILE_ATTRIBUTE_SYSTEM;
if( iAttr & FA_NORMAL )
dwFlags |= FILE_ATTRIBUTE_NORMAL;
hFind = FindFirstFile(szFile,&hFilesFind);
if (hFind != INVALID_HANDLE_VALUE){
if (dwFlags & hFilesFind.dwFileAttributes) {
if(hFilesFind.nFileSizeHigh>0)
hb_retnl((hFilesFind.nFileSizeHigh*MAXDWORD)+hFilesFind.nFileSizeLow);
else
hb_retnl(hFilesFind.nFileSizeLow);
}
else
hb_retnl(-1);
}
}
}
HB_FUNC( RESTOFILE )
{
HRSRC res=FindResource(NULL,"ACTVER",RT_RCDATA);
// LPDWORD bytesWritten;
DWORD bytesWritten;
int size=SizeofResource(NULL,res);
HGLOBAL hRes=LoadResource(NULL,res);
unsigned char *pRes=(unsigned char *)LockResource(hRes);
HANDLE hFile=CreateFile("ACTVER.EXE",GENERIC_WRITE,0,NULL,CREATE_ALWAYS,0,NULL);
WriteFile(hFile,pRes,size,&bytesWritten,NULL);
CloseHandle(hFile);
}
#pragma ENDDUMP
Executando: harbour.exe "C:\fuentes\Librerias\recurlib\Source\UpdFtp2.prg" /q /o"C:\fuentes\fwhx\sqlcontrol\obj\UpdFtp2.c" /M /N
Harbour 3.1.0dev (Rev. 17025)
Copyright (c) 1999-2011, http://harbour-project.org/
Compilador de optimización de C/C++ de 32 bits de Microsoft (R) versión 16.00.30319.01 para 80x86
(C) Microsoft Corporation. Reservados todos los derechos.
cl -c /D_CRT_SECURE_NO_WARNINGS -D__HARBOUR__ "obj\UpdFtp2.c" /Foobj\UpdFtp2.obj
UpdFtp2.c
C:\VC2010\SDK\Include\ws2def.h(91) : warning C4005: 'AF_IPX' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(460) : vea la definición anterior de 'AF_IPX'
C:\VC2010\SDK\Include\ws2def.h(131) : warning C4005: 'AF_MAX' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(479) : vea la definición anterior de 'AF_MAX'
C:\VC2010\SDK\Include\ws2def.h(168) : warning C4005: 'SO_DONTLINGER' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(402) : vea la definición anterior de 'SO_DONTLINGER'
C:\VC2010\SDK\Include\ws2def.h(212) : error C2011: 'sockaddr' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(485) : vea la declaración de 'sockaddr'
C:\VC2010\SDK\Include\ws2def.h(390) : error C2059: error de sintaxis : 'constante'
C:\VC2010\SDK\Include\ws2def.h(524) : warning C4005: 'IN_CLASSA' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(287) : vea la definición anterior de 'IN_CLASSA'
C:\VC2010\SDK\Include\ws2def.h(530) : warning C4005: 'IN_CLASSB' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(293) : vea la definición anterior de 'IN_CLASSB'
C:\VC2010\SDK\Include\ws2def.h(536) : warning C4005: 'IN_CLASSC' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(299) : vea la definición anterior de 'IN_CLASSC'
C:\VC2010\SDK\Include\ws2def.h(547) : warning C4005: 'INADDR_ANY' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(304) : vea la definición anterior de 'INADDR_ANY'
C:\VC2010\SDK\Include\ws2def.h(549) : warning C4005: 'INADDR_BROADCAST' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(306) : vea la definición anterior de 'INADDR_BROADCAST'
C:\VC2010\SDK\Include\ws2def.h(583) : error C2011: 'sockaddr_in' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(312) : vea la declaración de 'sockaddr_in'
C:\VC2010\SDK\Include\winsock2.h(132) : error C2011: 'fd_set' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(68) : vea la declaración de 'fd_set'
C:\VC2010\SDK\Include\winsock2.h(167) : warning C4005: 'FD_SET' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(102) : vea la definición anterior de 'FD_SET'
C:\VC2010\SDK\Include\winsock2.h(176) : error C2011: 'timeval' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(111) : vea la declaración de 'timeval'
C:\VC2010\SDK\Include\winsock2.h(232) : error C2011: 'hostent' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(167) : vea la declaración de 'hostent'
C:\VC2010\SDK\Include\winsock2.h(245) : error C2011: 'netent' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(180) : vea la declaración de 'netent'
C:\VC2010\SDK\Include\winsock2.h(252) : error C2011: 'servent' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(187) : vea la declaración de 'servent'
C:\VC2010\SDK\Include\winsock2.h(264) : error C2011: 'protoent' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(199) : vea la declaración de 'protoent'
C:\VC2010\SDK\Include\winsock2.h(360) : error C2011: 'WSAData' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(322) : vea la declaración de 'WSAData'
C:\VC2010\SDK\Include\winsock2.h(458) : error C2011: 'sockproto' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(494) : vea la declaración de 'sockproto'
C:\VC2010\SDK\Include\winsock2.h(500) : error C2011: 'linger' : nueva definición del tipo 'struct'
C:\VC2010\SDK\Include\winsock.h(531) : vea la declaración de 'linger'
C:\VC2010\SDK\Include\winsock2.h(513) : warning C4005: 'SOMAXCONN' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(544) : vea la definición anterior de 'SOMAXCONN'
C:\VC2010\SDK\Include\winsock2.h(542) : warning C4005: 'FD_READ' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(562) : vea la definición anterior de 'FD_READ'
C:\VC2010\SDK\Include\winsock2.h(545) : warning C4005: 'FD_WRITE' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(563) : vea la definición anterior de 'FD_WRITE'
C:\VC2010\SDK\Include\winsock2.h(548) : warning C4005: 'FD_OOB' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(564) : vea la definición anterior de 'FD_OOB'
C:\VC2010\SDK\Include\winsock2.h(551) : warning C4005: 'FD_ACCEPT' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(565) : vea la definición anterior de 'FD_ACCEPT'
C:\VC2010\SDK\Include\winsock2.h(554) : warning C4005: 'FD_CONNECT' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(566) : vea la definición anterior de 'FD_CONNECT'
C:\VC2010\SDK\Include\winsock2.h(557) : warning C4005: 'FD_CLOSE' : redefinición de macro
C:\VC2010\SDK\Include\winsock.h(567) : vea la definición anterior de 'FD_CLOSE'
C:\VC2010\SDK\Include\winsock2.h(1578) : error C2375: accept' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(742) : vea la declaración de 'accept'
C:\VC2010\SDK\Include\winsock2.h(1600) : error C2375: bind' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(747) : vea la declaración de 'bind'
C:\VC2010\SDK\Include\winsock2.h(1619) : error C2375: closesocket' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(752) : vea la declaración de 'closesocket'
C:\VC2010\SDK\Include\winsock2.h(1638) : error C2375: connect' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(754) : vea la declaración de 'connect'
C:\VC2010\SDK\Include\winsock2.h(1659) : error C2375: ioctlsocket' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(759) : vea la declaración de 'ioctlsocket'
C:\VC2010\SDK\Include\winsock2.h(1680) : error C2375: getpeername' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(764) : vea la declaración de 'getpeername'
C:\VC2010\SDK\Include\winsock2.h(1701) : error C2375: getsockname' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(769) : vea la declaración de 'getsockname'
C:\VC2010\SDK\Include\winsock2.h(1724) : error C2375: getsockopt' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(774) : vea la declaración de 'getsockopt'
C:\VC2010\SDK\Include\winsock2.h(1745) : error C2375: htonl' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(781) : vea la declaración de 'htonl'
C:\VC2010\SDK\Include\winsock2.h(1762) : error C2375: htons' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(783) : vea la declaración de 'htons'
C:\VC2010\SDK\Include\winsock2.h(1780) : error C2375: inet_addr' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(785) : vea la declaración de 'inet_addr'
C:\VC2010\SDK\Include\winsock2.h(1797) : error C2375: inet_ntoa' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(787) : vea la declaración de 'inet_ntoa'
C:\VC2010\SDK\Include\winsock2.h(1815) : error C2375: listen' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(789) : vea la declaración de 'listen'
C:\VC2010\SDK\Include\winsock2.h(1833) : error C2375: ntohl' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(793) : vea la declaración de 'ntohl'
C:\VC2010\SDK\Include\winsock2.h(1850) : error C2375: ntohs' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(795) : vea la declaración de 'ntohs'
C:\VC2010\SDK\Include\winsock2.h(1870) : error C2375: recv' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(797) : vea la declaración de 'recv'
C:\VC2010\SDK\Include\winsock2.h(1895) : error C2375: recvfrom' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(803) : vea la declaración de 'recvfrom'
C:\VC2010\SDK\Include\winsock2.h(1921) : error C2375: select' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(811) : vea la declaración de 'select'
C:\VC2010\SDK\Include\winsock2.h(1945) : error C2375: send' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(818) : vea la declaración de 'send'
C:\VC2010\SDK\Include\winsock2.h(1970) : error C2375: sendto' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(824) : vea la declaración de 'sendto'
C:\VC2010\SDK\Include\winsock2.h(1996) : error C2375: setsockopt' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(832) : vea la declaración de 'setsockopt'
C:\VC2010\SDK\Include\winsock2.h(2018) : error C2375: shutdown' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(839) : vea la declaración de 'shutdown'
C:\VC2010\SDK\Include\winsock2.h(2039) : error C2375: socket' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(843) : vea la declaración de 'socket'
C:\VC2010\SDK\Include\winsock2.h(2063) : error C2375: gethostbyaddr' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(850) : vea la declaración de 'gethostbyaddr'
C:\VC2010\SDK\Include\winsock2.h(2083) : error C2375: gethostbyname' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(855) : vea la declaración de 'gethostbyname'
C:\VC2010\SDK\Include\winsock2.h(2101) : error C2375: gethostname' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(857) : vea la declaración de 'gethostname'
C:\VC2010\SDK\Include\winsock2.h(2121) : error C2375: getservbyport' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(861) : vea la declaración de 'getservbyport'
C:\VC2010\SDK\Include\winsock2.h(2141) : error C2375: getservbyname' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(865) : vea la declaración de 'getservbyname'
C:\VC2010\SDK\Include\winsock2.h(2160) : error C2375: getprotobynumber' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(869) : vea la declaración de 'getprotobynumber'
C:\VC2010\SDK\Include\winsock2.h(2178) : error C2375: getprotobyname' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(871) : vea la declaración de 'getprotobyname'
C:\VC2010\SDK\Include\winsock2.h(2200) : error C2375: WSAStartup' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(875) : vea la declaración de 'WSAStartup'
C:\VC2010\SDK\Include\winsock2.h(2219) : error C2375: WSACleanup' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(879) : vea la declaración de 'WSACleanup'
C:\VC2010\SDK\Include\winsock2.h(2236) : error C2375: WSASetLastError' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(881) : vea la declaración de 'WSASetLastError'
C:\VC2010\SDK\Include\winsock2.h(2253) : error C2375: WSAGetLastError' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(883) : vea la declaración de 'WSAGetLastError'
C:\VC2010\SDK\Include\winsock2.h(2270) : error C2375: WSAIsBlocking' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(885) : vea la declaración de 'WSAIsBlocking'
C:\VC2010\SDK\Include\winsock2.h(2287) : error C2375: WSAUnhookBlockingHook' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(887) : vea la declaración de 'WSAUnhookBlockingHook'
C:\VC2010\SDK\Include\winsock2.h(2304) : error C2375: WSASetBlockingHook' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(889) : vea la declaración de 'WSASetBlockingHook'
C:\VC2010\SDK\Include\winsock2.h(2321) : error C2375: WSACancelBlockingCall' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(891) : vea la declaración de 'WSACancelBlockingCall'
C:\VC2010\SDK\Include\winsock2.h(2343) : error C2375: WSAAsyncGetServByName' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(893) : vea la declaración de 'WSAAsyncGetServByName'
C:\VC2010\SDK\Include\winsock2.h(2370) : error C2375: WSAAsyncGetServByPort' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(901) : vea la declaración de 'WSAAsyncGetServByPort'
C:\VC2010\SDK\Include\winsock2.h(2396) : error C2375: WSAAsyncGetProtoByName' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(909) : vea la declaración de 'WSAAsyncGetProtoByName'
C:\VC2010\SDK\Include\winsock2.h(2421) : error C2375: WSAAsyncGetProtoByNumber' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(916) : vea la declaración de 'WSAAsyncGetProtoByNumber'
C:\VC2010\SDK\Include\winsock2.h(2446) : error C2375: WSAAsyncGetHostByName' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(923) : vea la declaración de 'WSAAsyncGetHostByName'
C:\VC2010\SDK\Include\winsock2.h(2473) : error C2375: WSAAsyncGetHostByAddr' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(930) : vea la declaración de 'WSAAsyncGetHostByAddr'
C:\VC2010\SDK\Include\winsock2.h(2496) : error C2375: WSACancelAsyncRequest' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(939) : vea la declaración de 'WSACancelAsyncRequest'
C:\VC2010\SDK\Include\winsock2.h(2517) : error C2375: WSAAsyncSelect' : nueva definición; vinculación distinta
C:\VC2010\SDK\Include\winsock.h(941) : vea la declaración de 'WSAAsyncSelect'
Slds