Métodos de protección Mq4.. - página 2

Nuevo comentario
 
alguien me puede ayudar con esto....
 

explique el problema

si entiendo bien (como lo has descrito anteriormente) tus habilidades de programación no son tan buenas

creo que está más allá de sus capacidades

 
Y utiliza el alojamiento web gratuito es otro fracaso.
 
//+------------------------------------------------------------------+
//| GetVolumeInformation.mq4 ||
//+------------------------------------------------------------------+
#property copyright"Copyright © free"
#property link "free"
#property strict
#property show_inputs

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

extern string Letra de la unidad = "C";

void start()
{
string sNameDisk = DriveLetter + ":\\N";
string sNameBuffer = " ";
string 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);
si (FunctionOk)
Comment("NameBuffer: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \'", sSysNameBuffer,"\'",
"\nSysNameBuffer: ", sSysNameBuffer,
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);
si no
Comment("¡GetVolumeInformationA no se ha recuperado toda la información solicitada!"
"\NNNNNombreBuffer: \'", sNameBuffer,"\'",
"\nSysNameBuffer: \'", sSysNameBuffer,"\'",
"\nVSNumber = ", dwVSNumber[0],
"\nMCLength = ", dwMCLength[0],
"\nFileSF = ", dwFileSF[0]);

devolver;
}


no funciona en la build 600+

 
no hables como un geek,, sin hacer nada habla como el infierno ..
 
hacer un buen reparto
 

registro de lectura no tan ayuda completa

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

/ / | 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 ]) ;
 }
 
solo quiero comparar el NUMERO DE SERIE DEL DISCO y si es verdadero el código restante tiene que ejecutarse..
 
kum01049:
solo quiero comparar el NUMERO DE SERIE DEL DISCO y si es cierto el codigo restante tiene que ejecutarse..

Te recuerdo que la publicidad no está permitida en este foro. Y te sugiero que te calmes, esperes una respuesta y no postees compulsivamente.

 
He eliminado el tat...
1234
Nuevo comentario