Metodi di protezione Mq4.. - pagina 2

Nuovo commento
 
qualcuno mi aiuta con questo ....
 

spiegare il problema

se ho capito bene (come hai descritto sopra) le tue capacità di programmazione non sono così grandi

penso che sia al di là delle tue capacità

 
E usa il web hosting gratuito è un altro fallimento.
 
//+------------------------------------------------------------------+
//| GetVolumeInformation.mq4
//+------------------------------------------------------------------+
#proprietà copyright"Copyright © libero"
#proprietà link "free"
#proprietà strict
#proprietà show_inputs

#importare "kernel32.dll"
bool GetVolumeInformationW(stringa lpRootPathName,
stringa lpVolumeNameBuffer,
int nVolumeNameSize,
int &lpVolumeSerialNumber[],
int &lpMaximumComponentLength[],
int &lpFileSystemFlags[],
stringa lpFileSystemNameBuffer,
int nFileSystemNameSize);
#importare

extern string DriveLetter = "C";

void start()
{
stringa sNameDisk = DriveLetter + ":\\";
stringa sNameBuffer = " ";
stringa sSysNameBuffer = " ";
int dwVSNumber[1] = {0};
int dwMCLength[1] = {0};
int dwFileSF[1] = {0};
bool FunctionOk = GetVolumeInformationW(sNameDisk,
sNameBuffer,
StringLen(sNameBuffer) + 1,
dwVSNumber,
dwMCLength,
dwFileSF,
sSysNameBuffer,
StringLen(sSysNameBuffer) + 1);
se (FunctionOk)
Comment("NameBuffer: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \", sSysNameBuffer,"\",
"\nSysNameBuffer:", sSysNameBuffer,
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);
altrimenti
Comment("GetVolumeInformationA non sono state recuperate tutte le informazioni richieste!"
"\nameBuffer: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \'", sSysNameBuffer,"\'",
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);

ritorna;
}


non funziona nella build 600+

 
non parlare come un geek,, non fare nulla parlare come l'inferno.
 
fare un po' di buona condivisione
 

lettura del registro non così aiuto pieno

/ / + ----------------------------------------------- ------------------- + 

/ / | Readreg.mq4 | 
/ / + -------------------- ---------------------------------------------- + 
# property  copyright  " "
# Property  Link       "  "
 
//————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————— 
// LIBRARY WORK WITH РЕЕСТРОМ 
//————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————————— 
#import  " advapi32.dll "
    int  RegOpenKeyA ( int  hkey , string  lpSubKey , int  phkResult []) ;
     int  RegCloseKey ( int  hkey ) ;
     int  RegQueryValueExA ( int  hkey , string  lpValueName , int  lpReserved , int  lpType [] , string  lpData , int  lpcbData []) ;
     int  RegSetValueExA ( int  hkey , string  lpValueName , int  Reserved , int  dwType , string  lpData , int  cbData ) ;
 
int  start () 
{ 
  string  Res = GetRegString ( 0x80000002 , " SOFTWARE \\ Microsoft \\ Windows \\ CurrentVersion \\ Explorer \\ Shell Folders " , " Personal " ) ;
    
  Print ( Res ) ; MessageBox ( Res ) ;
 }
 
string  GetRegString ( int  HomeKey , string  KeyName , string  ValueName )  
{ 
  int  hkey [ 1 ] ;        / / Handle the registry 
  string  sData ;       / / variable to store the value 
  int  lRes ;           / / The result of the API functions 
  int  lDataType [ 1 ] ;   / / The return type is 
  int  lDlen [ 1 ] ,       / / variable to store the length of the string 
  int  P ;              / / variable to trim the last blank lines 
  lRes = RegOpenKeyA ( HomeKey , KeyName , hkey ) ; / / Open Section
  
  Print ( " RegOpenKeyA ret code = " + lRes ) ; 
 / *
Return values
Public Const ERROR_SUCCESS = 0 &
Public Const ERROR_FILE_NOT_FOUND = 2 &
Public Const ERROR_ACCESS_DENIED = 5 &
Public Const ERROR_INVALID_HANDLE = 6 &
Public Const ERROR_INVALID_PARAMETER = 87
Public Const ERROR_CALL_NOT_IMPLEMENTED = 120 &
Public Const ERROR_INSUFFICIENT_BUFFER = 122
Public Const ERROR_MORE_DATA = 234
Public Const ERROR_NO_MORE_ITEMS = 259 &
Public Const ERROR_CANTOPEN = 1011 &
Public Const ERROR_CANTREAD = 1012 &
Public Const ERROR_CANTWRITE = 1013 &
Public Const ERROR_REGISTRY_RECOVERED = 1014 &
Public Const ERROR_REGISTRY_CORRUPT = 1015 &
Public Const ERROR_REGISTRY_IO_FAILED = 1016 &
Public Const ERROR_NOT_REGISTRY_FILE = 1017 &
Public Const ERROR_KEY_DELETED = 1018 &
* /   
  if  ( lRes ! = 0 )  return ( "" ) ; / / If not returned zero - error 
                                                                                                                         value
  
  Print ( " RegQueryValueExA ret code = " + lRes + "   Value = " + sData ) ;
  
  if  ( lRes ! = 0 )  return ( "" ) ; / / If not returned zero - error exit
 
  if  ( lDataType [ 0 ] == 1 | | lDataType [ 0 ] == 2 )  return ( StringSubstr ( sData , 0 , lDlen [ 0 ] - 1 )) ; / / REG_SZ, REG_EXPAND_SZ - nul terminated Unicode string 
  else  if  ( lDataType [ 0 ] == 7 )  / / REG_MULTI_SZ - Multiple Unicode 
      
        zeros on the newline             
    return ( sData ) ;
   } 
  else  return ( "" ) ; / / other data types are not converted to a string: ( 
  lRes = RegCloseKey ( hkey [ 0 ]) ;
 }
 
Voglio solo confrontare il DISK SERIAL NUMBER e se è vero, il codice rimanente deve essere eseguito.
 
kum01049:
Voglio solo confrontare il numero seriale del disco e se è vero, il codice rimanente deve essere eseguito.

Ti ricordo che la pubblicità non è permessa su questo forum. E ti suggerisco di calmarti, aspettare una risposta e non postare in modo compulsivo.

 
Ho rimosso il tat...
1234
Nuovo commento
Motivazione: