red flower0
زيزوومي جديد
- إنضم
- 11 أكتوبر 2011
- المشاركات
- 128
- مستوى التفاعل
- 0
- النقاط
- 0
غير متصل
قم بمتابعة الفيديو أدناه لمعرفة كيفية تثبيت موقعنا كتطبيق ويب على الشاشة الرئيسية.
ملاحظة: قد لا تكون هذه الميزة متاحة في بعض المتصفحات.
ممكن احد يساعدنا في شرح الامر
readfile
[EMAIL="$note=@ScriptDir"]$note=@ScriptDir[/EMAIL] &"\test.txt"
$input="1.1 [URL="http://www.zyzoom"]www.zyzoom[/URL] " "1.1 waget" "1.1 younes7x" "1.1. himo script" "1.1 all members" "1.1 red flower"
$readnote = FileRead($note,$input)
If $readnote = 0 Then
FileWrite ($note,""[EMAIL="&@CRLF&"1.1"]&@CRLF&"1.1[/EMAIL] [URL="http://www.zyzoom"&@CRLF"]www.zyzoom"&@CRLF[/URL]&" 1.1 waget"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1. yones7x"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1. himo script"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1 all members "[EMAIL="&@CRLF&"1.1"]&@CRLF&"1.1[/EMAIL] red flower")
Else
MsgBox(0,"","")
EndIf
اشرايكم بالكود التالي هل هو صحيح ام خاطئكود:[EMAIL="$note=@ScriptDir"]$note=@ScriptDir[/EMAIL] &"\test.txt"[COLOR="#FF0000"] $input="1.1 [URL="http://www.zyzoom"]www.zyzoom[/URL] " "1.1 waget" "1.1 younes7x" "1.1. himo script" "1.1 all members" "1.1 red flowe[/COLOR]r" $readnote = FileRead($note,$input) If $readnote = 0 Then FileWrite ($note,""[EMAIL="&@CRLF&"1.1"]&@CRLF&"1.1[/EMAIL] [URL="http://www.zyzoom"&@CRLF"]www.zyzoom"&@CRLF[/URL]&" 1.1 waget"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1. yones7x"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1. himo script"[EMAIL="&@CRLF"]&@CRLF[/EMAIL]&" 1.1 all members "[EMAIL="&@CRLF&"1.1"]&@CRLF&"1.1[/EMAIL] red flower") Else MsgBox(0,"","") EndIf
إنت إيش رأيك .. شغلت الكود !!
أللي بالاحمر إيش هدفك بوضع القيم بهذي الصورة !!
على العموم شيك هنا
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
ممكن احد يساعدنا في شرح الامر
readfile
FileRead ( "filehandle/filename" [, count] )
$read=FileRead('x.txt')
MsgBox(0,'read',$read)
$read=FileRead('x.txt',5)
MsgBox(0,'read',$read)
رجعنا مرة أخرى للاستفسارات وكثرة الاسئلة
ممكن مساعدة وما هو السكربت المسؤول عن حذف برنامج الانترنت داونلود مانجر بشكل تلقائي و بدون اظهار رسالة اعادة تشغيل
رجعنا مرة أخرى للاستفسارات وكثرة الاسئلة
ممكن مساعدة وما هو السكربت المسؤول عن حذف برنامج الانترنت داونلود مانجر بشكل تلقائي و بدون اظهار رسالة اعادة تشغيل
#include <Process.au3>
$r = _RunDos("rd /s /q ""%programfiles%\Internet Download Manager""")
if $r = 0 Then
MsgBox(0,"ok","تم حذف البرنامج")
Else
MsgBox(0,"Erorr","لم يتم حذف البرنامج")
EndIf
تفضل يحذفه من جذوره بس لازم تقفله من جنب الساعه او تظيف امر اغلاق المنجر
كود:#include <Process.au3>
كود:[CENTER]$r = _RunDos("rd /s /q ""%programfiles%\Internet Download Manager""") [CENTER] if $r = 0 Then MsgBox(0,"ok","تم حذف البرنامج") Else MsgBox(0,"Erorr","لم يتم حذف البرنامج") EndIf[/CENTER]
رجعنا مرة أخرى للاستفسارات وكثرة الاسئلة
ممكن مساعدة وما هو السكربت المسؤول عن حذف برنامج الانترنت داونلود مانجر بشكل تلقائي و بدون اظهار رسالة اعادة تشغيل
صبااحكم عسل ..
يالحلاا انت باقي تهاوش الناس على اكوادهم ...![]()
ممكن يا شباب عند الكلك على الدونلود في التول يعمل سيف على مكان معين وشكراً
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm##include][color=#F000FF][i]#include[/i][/color][/url] [color=#9999CC]<ButtonConstants.au3>[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm##include][color=#F000FF][i]#include[/i][/color][/url] [color=#9999CC]<GUIConstantsEx.au3>[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm##include][color=#F000FF][i]#include[/i][/color][/url] [color=#9999CC]<WindowsConstants.au3>[/color]
[color=#AA0000]$window[/color] [color=#FF0000]=[/color] [url=http://www.autoitscript.com/autoit3/docs/functions/GUICreate.htm][color=#000090][i]GUICreate[/i][/color][/url][color=#FF0000]([/color][color=#9999CC]""[/color][color=#FF0000],[/color] [color=#AC00A9][i]169[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]80[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]192[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]124[/i][/color][color=#FF0000])[/color]
[color=#AA0000]$Button[/color] [color=#FF0000]=[/color] [url=http://www.autoitscript.com/autoit3/docs/functions/GUICtrlCreateButton.htm][color=#000090][i]GUICtrlCreateButton[/i][/color][/url][color=#FF0000]([/color][color=#9999CC]"Download"[/color][color=#FF0000],[/color] [color=#AC00A9][i]24[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]16[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]123[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]41[/i][/color][color=#FF0000])[/color]
[url=http://www.autoitscript.com/autoit3/docs/functions/GUICtrlSetFont.htm][color=#000090][i]GUICtrlSetFont[/i][/color][/url][color=#FF0000](-[/color][color=#AC00A9][i]1[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]12[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]800[/i][/color][color=#FF0000],[/color] [color=#AC00A9][i]0[/i][/color][color=#FF0000],[/color] [color=#9999CC]"MS Sans Serif"[/color][color=#FF0000])[/color]
[url=http://www.autoitscript.com/autoit3/docs/functions/GUISetState.htm][color=#000090][i]GUISetState[/i][/color][/url][color=#FF0000]([/color][url=http://www.autoitscript.com/autoit3/docs/macros.htm#@sw_show][color=#FF33FF]@SW_SHOW[/color][/url][color=#FF0000])[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#While][color=#0000FF]While[/color][/url] [color=#AC00A9][i]1[/i][/color]
[color=#AA0000]$nMsg[/color] [color=#FF0000]=[/color] [url=http://www.autoitscript.com/autoit3/docs/functions/GUIGetMsg.htm][color=#000090][i]GUIGetMsg[/i][/color][/url][color=#FF0000]()[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#Switch][color=#0000FF]Switch[/color][/url] [color=#AA0000]$nMsg[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#Case][color=#0000FF]Case[/color][/url] [color=#AA0000]$GUI_EVENT_CLOSE[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit][color=#0000FF]Exit[/color][/url]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#Case][color=#0000FF]Case[/color][/url] [color=#AA0000]$Button[/color]
[color=#669900][i]#cs
عند النقر على زر التحميل يتنفذ الكود التالي
FileSaveDialog :
دالة تظهر نافذة الحفظ وترجع مسار الملف المراد حفظة
$path :
لحفظ ماترجعه الدالة فيه
#ce
[/i][/color] [color=#AA0000]$path[/color] [color=#FF0000]=[/color] [url=http://www.autoitscript.com/autoit3/docs/functions/FileSaveDialog.htm][color=#000090][i]FileSaveDialog[/i][/color][/url][color=#FF0000]([/color][color=#9999CC]"Save"[/color][color=#FF0000],[/color][url=http://www.autoitscript.com/autoit3/docs/macros.htm#@scriptdir][color=#FF33FF]@ScriptDir[/color][/url][color=#FF0000],[/color][color=#9999CC]"All File (*.*)"[/color][color=#FF0000],[/color][color=#AC00A9][i]2[/i][/color][color=#FF0000],[/color][color=#9999CC]""[/color][color=#FF0000],[/color][color=#AA0000]$window[/color][color=#FF0000])[/color]
[color=#669900][i]#cs
InetGet :
دالة لطلب تنزيل ملف
المدخل الاول رابط التنزيل
المدخل الثاني مسار الحفظ
#ce
[/i][/color]
[url=http://www.autoitscript.com/autoit3/docs/functions/InetGet.htm][color=#000090][i]InetGet[/i][/color][/url] [color=#FF0000]([/color][color=#9999CC]"https://dc1.safesync.com/LMHmFbrB/TEST/test.txt?a=1iPsSqePzww"[/color][color=#FF0000],[/color][color=#AA0000]$path[/color][color=#FF0000])[/color]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#EndSwitch][color=#0000FF]EndSwitch[/color][/url]
[url=http://www.autoitscript.com/autoit3/docs/keywords.htm#WEnd][color=#0000FF]WEnd[/color][/url]
وجدت ضالتك اذن توصلت لأيه بالضبط
+
هل شاهدت نسختى الخاصه من البرنامج النسخه الذهبيه ؟؟
او هل شاهدت ااه حزف البرنامج من جزوره التى قمت بأنشائها
راجع مواضيع ان شاء الله بتفيدك
بانتظارك
:hh::hh::hh:
الحلا صدقني عنده افكار بس مشكلته مايعرف كيف يستفيد ويفيد من الموضوع اكثر
ترا انا ادخل سكاتي هنا اخذف فكره واطبقها
بالتوفيق يارب للجميع