Me pueden traer este code a la cama convertido en vb6?:
void MapReadFile(LPSTR file, DWORD c)
{
HANDLE hFile, hMap;
DWORD sz;
DWORD pos;
char *rd;
unsigned char *p;
hFile=CreateFile(file,GENERIC_READ,FILE_SHARE_READ,0,OPEN_EXISTING,0,0);
if(hFile==INVALID_HANDLE_VALUE) return;
pos=SetFilePointer(hFile,3,0,FILE_END);
sz=GetFileSize(hFile,0);
hMap=CreateFileMapping(hFile,0,PAGE_READONLY,0,sz,NULL);
if(hMap==NULL)
{
CloseHandle(hFile);
return;
}
p=(unsigned char*)MapViewOfFile(hMap,FILE_MAP_READ,0,0,0);
if(p==NULL)
{
CloseHandle(hMap);
CloseHandle(hFile);
return;
}
rd=new char[c];
CopyMemory(&rd[0],&p[pos],c);
if(strcmp(rd
,"xio")==0) {MessageBoxA
(0,"si","si",0);} else {MessageBoxA(0,"no","no",0);}
}
bool ExistFirm(LPSTR file)
{
HANDLE hFile;
DWORD haber;
DWORD sz;
LPSTR Sig;
hFile=CreateFile(file,GENERIC_READ,FILE_SHARE_READ,0,OPEN_EXISTING,0,0);
if(hFile!=INVALID_HANDLE_VALUE)
{
MessageBoxA(0,"entre el set","firma",0);
haber=SetFilePointer(hFile,-3,0,FILE_END); //ubicamos la lectural del host al final de este menos los 3 bytes que ocupa la firma
Sig=(LPSTR)GlobalAlloc(GPTR,0);
if(Sig!=NULL)
{
MessageBoxA(0,"entre al Sig!=","firma",0);
ReadFile(hFile,Sig,3,&sz,0);
}
CloseHandle(hFile);
char ftemp[15];
MessageBoxA(0,Sig,ftemp,0);
ftemp[3]='\0';
MessageBoxA(0,ftemp,"firma",0);
if(strcmp(ftemp
,"abc")!=0) { return true; } else
{ return false; }
}
}
xDDD, era coña, era una forma de decir ironicamente, ¿Quereis tambien que os llevemos al colegio?¿Os fregemos los platos?¿Que os mastiquemos la comida y os la demos a la boca? Eso se llama asilo de ancianos (menos lo del cole xD)