[au3-G] :: استفسارات ، مشاكل ، حلول ,, إضافات ,, دروس تقوية ,, أوامر جاهزة ,, أمثلة ,, في AutoIt 3

ashalshaikh · 5 يوليو 2009

درس
_FileCountLines
عد أسطر ملف
إعداد : Ashalshaikh

نحتاج لعمل تضمين لمكتبة File.au3
إذا صيغة الأمر كالتالي

كود:

[color=#9999cc][color=#f000ff]#Include[/COLOR] <File.au3>[/COLOR][color=#009933][/COLOR]
[color=#0080ff]_FileCountLines[/color][color=#ff0000]([/color][color=#aa0000]$sFilePath[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]

حيث $sFilePath = مسار الملف الذي تريد قراءة عدد أسطره !!
مثال

كود:

[color=#9999cc][color=#f000ff]#Include[/COLOR] <file.au3>[/COLOR][color=#009933][/COLOR]
[color=#aa0000]$CountLines[/COLOR] [color=#ff0000]=[/color] [color=#0080ff]_FileCountLines[/color][color=#ff0000]([/color][color=#9999cc]"error.log"[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#000090]MsgBox[/color][color=#ff0000]([/color][color=#ac00a9]6[/color][color=#ac00a9]4[/color][color=#ff0000],[/color] [color=#9999cc]"Error log recordcount"[/COLOR][color=#ff0000],[/color] [color=#9999cc]"There are "[/COLOR] [color=#ff0000]&[/color] [color=#aa0000]$CountLines[/COLOR] [color=#ff0000]&[/color] [color=#9999cc]" in the error.log."[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#0000ff]Exit[/color][color=#009933][/COLOR]

بارك الله فيكم !!

Future Tank X-1 · 5 يوليو 2009

ashalshaikh قال:

بسم الله الرحمن الرحيم

درس
FileReadLine
قراءة سطر من ملف !!
إعداد : Ashalshaikh
أيضا شرحته لأن فيه مثال اليوم :y: يتعلق به :d:

صيغته كالتالي ::

كود:

  [FONT=Times New Roman][COLOR=blue][COLOR=navy]FileReadLine[/COLOR] [COLOR=red]([/COLOR] "filename" [[COLOR=red],[/COLOR] line][COLOR=red] )[/COLOR][/COLOR][/FONT]

حيث
بببببببب filename = اسم الملف الذي تريد تقرأه
ببببببب line = رقم السطر الذي تريد تقرأه !!

مثال :

كود:

[FONT=Times New Roman][COLOR=#aa0000]$line[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#000090]FileRead[/COLOR][/FONT][FONT=Times New Roman][COLOR=navy]Line[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff33ff]@WindowsDir[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]&[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"\system.ini"[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][/CENTER]

[FONT=Times New Roman][COLOR=#000090]MsgBox[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]0[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Line read:"[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$line[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][CENTER]

والسلام عليكم ورحمة الله وبركاته !!

ashalshaikh قال:

درس

_FileCountLines
عد أسطر ملف
إعداد : Ashalshaikh

نحتاج لعمل تضمين لمكتبة File.au3
إذا صيغة الأمر كالتالي

كود:

[FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <File.au3>[/COLOR][/FONT][/CENTER]

[FONT=Times New Roman][COLOR=#0080ff]_FileCountLines[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#aa0000]$sFilePath[/COLOR][COLOR=#ff0000])[/COLOR][/FONT][CENTER]

حيث $sFilePath = مسار الملف الذي تريد قراءة عدد أسطره !!

مثال

كود:

[FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <file.au3>[/COLOR][/FONT]
[FONT=Times New Roman][COLOR=#aa0000]$CountLines[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#0080ff]_FileCountLines[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"error.log"[/COLOR][COLOR=#ff0000])[/COLOR][/FONT]
[FONT=Times New Roman][COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]6[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"Error log recordcount"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"There are "[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#aa0000]$CountLines[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]" in the error.log."[/COLOR][COLOR=#ff0000])[/COLOR][/FONT][/CENTER]

[FONT=Times New Roman][COLOR=#0000ff]Exit[/COLOR][/FONT][CENTER]

بارك الله فيكم !!

اقول خلك من الاوتو وتابع فضايح برامج الحمايه !!
وانت السبب !!
:bleh:

himoScript · 5 يوليو 2009

شباب ممتاز هذا الكلام والله

خلينى اقول لكم شئ

وهو سؤال صراحه

يوجد عندنا برنامج قمنا بتشغيله وهو الأن فى شريط المهام ونحن نعمل على برنامج اخر
البرنامج الأول اسمه x
لو أردنا اخفاء برنامج x من شريط المهام ؟. ماذا نفعل ؟؟؟؟

himoScript · 5 يوليو 2009

وبالمره عندنا امر نود شرحه وهو

WinFlash

فى شريط المهام

عندنا نوافذ كثيره طيب نريد نافذه معينه نعمل عليها بكثره ولكن ضائعه وسط النوافذ
هذا الأمر يقوم بعمل فلاش عليها لكى تظهر لنا

مثال

WinFlash('Untitled - Notepad',"", 4, 500)

سهل وبسيط

ashalshaikh · 5 يوليو 2009

تابع
المصفوفات (1)
,, أمثلة وتطبيقات(1) ,,
على فكرة ,, حتى الآن لم ننتهي من مفهوم المصفوفات
ولكننا انتهيا تقريبا من 60%
وهذه الأمثلة والتطبيقات لتقريب المعنى

أولا ::
رح ناخذ أمر جميل ولن نأخذه بالكامل ,, بل لتقريب المعنى ,,
وهو يظهر لك المصفوفة :: على شكل جدول واضح ,, لتفهموها تماما
إنه الأمر
_ArrayDisplay
نحتاج لتضمين بسيط وهو

كود:

[FONT=Times New Roman][COLOR=Magenta]#Include[/COLOR][/FONT][FONT=Times New Roman][COLOR=RoyalBlue]<Array.au3>[/COLOR][/FONT]

سنأخذ صيغة بسيطة له (وهي ليست الكاملة) وهي

كود:

 [FONT=Times New Roman][COLOR=#0080ff]_ArrayDisplay[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT]

مثال

كود:

 [FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <Array.au3>[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#0000ff]Dim[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]5[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]0[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Ahmad1"[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Ahmad2"[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]2[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Ahmad3"[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]3[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Ahmad4"[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]4[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"Ahmad5"[/COLOR][/FONT][FONT=Times New Roman]
[/FONT] [FONT=Times New Roman][COLOR=#0080ff]_ArrayDisplay[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT]

ثانيا ::تطبيقات
1
برنامج أذكار
إظهار دعاء كل خمس ثواني
فكرة :: القناص
تنفيذ :: القناص
وفقه الله
لاحظ سهولة التنفيذ بالمصفوفات وصعوبتها بدونها :u:

كود:

[COLOR=#669900]#cs ----------------------------------------------------------------------------[/COLOR]
[COLOR=#669900] AutoIt Version: 3.3.0.0[/COLOR]
[COLOR=#669900] Author:        Alqnnas[/COLOR]
[COLOR=#669900] Name  :        Athkar [/COLOR]
[COLOR=#669900]#ce ----------------------------------------------------------------------------[/COLOR]
[COLOR=#009933];تعريف المصفوفة[/COLOR]
[COLOR=#0000ff]Dim[/COLOR] [COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000]][/COLOR]
[COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"سبحان الله وبحمده"[/COLOR] 
[COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]1[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"استغفر الله"[/COLOR] 
[COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]2[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"لا اله الا الله"[/COLOR] 
[COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]3[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"لا إله إلا الله, وحده لا شريك له, له الملك, وله الحمد, وهو على كل شئ قدير"[/COLOR] 
[COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#9999cc]"أشهد أن لا إله إلا الله وحده لا شريك له, وأشهد أن محمداً عبده ورسوله"[/COLOR]

[COLOR=#0000ff]While[/COLOR] [COLOR=#ac00a9]1[/COLOR]
    [COLOR=#aa0000]$B[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]Random[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]0[/COLOR] [COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]4[/COLOR] [COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]1[/COLOR][COLOR=#ff0000])[/COLOR]  [COLOR=#009933];انتاج عدد عشوائي بين صفر وأربعة ,, ويكون صحيح[/COLOR]
    [COLOR=#000090]TrayTip[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]""[/COLOR] [COLOR=#ff0000],[/COLOR][COLOR=#aa0000]$A[/COLOR][COLOR=#ff0000][[/COLOR][COLOR=#aa0000]$B[/COLOR][COLOR=#ff0000]][/COLOR] [COLOR=#ff0000],[/COLOR] [COLOR=#ac00a9]5[/COLOR][COLOR=#ff0000])[/COLOR] [COLOR=#009933];إظهار ملاحظة في التراي تظهر الذكر برقم العشواء[/COLOR]
    [COLOR=#000090]Sleep[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]5[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ac00a9]0[/COLOR][COLOR=#ff0000])[/COLOR]             [COLOR=#009933];انتظار خمس ثواني ثم الإعادة[/COLOR]
[COLOR=#0000ff]WEnd[/COLOR]

2
قراءة أسطر ملف ,,
ووضعها في مصفوفة ,,,
فكرة :: Alzri2
تنفيذ :: Alzri2
وفقه الله ,,

لاحظ سهولة العمل

k:
بينما لو لم تعملها مصفوفات

المثال معقد بعض الشيء ,, ولكنه سهل الفهم بإذن الله

كود:

  [FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <Array.au3>                                [/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; تضمين أوامر مصفوفات جديدة[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <File.au3>                                     [/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; تضمين أوامر الملفات جديدة[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#009933];// Simple about "Array"[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#009933];// By : Alzri2[/COLOR][/FONT]

  [FONT=Times New Roman][COLOR=#aa0000]$FileName[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"C:\WINDOWS\system.ini"[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];اسم الملف[/COLOR][/FONT]

  [FONT=Times New Roman][COLOR=#aa0000]$Count[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#0080ff]_FileCountLines[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$FileName[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; قراءة عدد أسطر الملف وحفظ الناتج في المتغير[/COLOR][/FONT]

  [FONT=Times New Roman][COLOR=#0000ff]Dim[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Count[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]+[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; تعريف مصفوفة طولها بعدد الأسطر[/COLOR][/FONT]

  [FONT=Times New Roman][COLOR=#0000ff]FOr[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Var[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#0000ff]To[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Count[/COLOR][/FONT] 
[FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$var[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#000090][COLOR=#000090]FileRead[/COLOR]Line[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$FileName[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$var[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];تعريف كل من المصفوفة بسطر ويزداد مع الدوران[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#0000ff]Next[/COLOR][/FONT]


   [FONT=Times New Roman][COLOR=#000090]MsgBox[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]6[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]4[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]"السطر الأول"[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];عرض السطر الأول[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#0080ff]_ArrayDisplay[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$Array[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];عرض المصفوفة كاملة[/COLOR][/FONT]

ثالثا :: أمثلة
وهي عدة أوامر ,,
ترجع النتيجة على شكل مصفوفة :: Array

ناخذ مثلا ::
الأمر :::
جلب الدرايفات

كود:

 [FONT=Times New Roman][COLOR=#009933];By :: Ashalshaikh[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <Array.au3>                   [/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; تضمين أوامر مصفوفات جديدة[/COLOR][/FONT]
[color=#aa0000]$aDrives[/COLOR] [color=#ff0000]=[/color] [color=#000090]DriveGetDrive[/color] [color=#ff0000]([/color][color=#9999cc]"FIXED"[/COLOR][color=#ff0000])[/color]   [color=#009933];جلب الدرايفات على شكل مصفوفة[/COLOR]
 [FONT=Times New Roman][COLOR=#0080ff]_ArrayDisplay[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$aDrives[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];عرض المصفوفة كاملة[/COLOR][/FONT]

  [FONT=Times New Roman][COLOR=#009933];========= عرضها في رسائل =========[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#0000ff]FOr[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$x[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]1[/COLOR][/FONT][FONT=Times New Roman][COLOR=#0000ff]To[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$aDrives[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]0[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT]
[FONT=Times New Roman][COLOR=#000090]MsgBox[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#ac00a9]0[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#9999cc]""[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000],[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$aDrives[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000][[/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$x[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]][/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#0000ff]Next[/COLOR][/FONT]

أو مثلا ::
أمر جلب الملفات داخل مجلد ,,
<<<< عرفناه من قبل شرحه أحد الإخوة

كود:

[FONT=Times New Roman][COLOR=#9999cc][COLOR=#f000ff]#Include[/COLOR] <File.au3>                        [/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933]; تضمين أوامر الملفات جديدة[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#aa0000]$aFiles[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]=[/COLOR][/FONT][FONT=Times New Roman][COLOR=#0080ff]_FileListToArray[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff33ff]@WindowsDir[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT]
 [FONT=Times New Roman][COLOR=#0080ff]_ArrayDisplay[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000]([/COLOR][/FONT][FONT=Times New Roman][COLOR=#aa0000]$aFiles[/COLOR][/FONT][FONT=Times New Roman][COLOR=#ff0000])[/COLOR][/FONT][FONT=Times New Roman][COLOR=#009933];عرض المصفوفة كاملة[/COLOR][/FONT]

تم بحمد الله
اليوم أتممنا تعلم كيف ننشأ مصفوفة ,, بعمود واحد وصفوف كثيرة <<< كما رأيتم في ArrayDisplay
في الدرس القادم ,, سنتعلم إنشاء مصفوفة بصفوف كثيرة ,,وأعمدة كثيرة :u:<<< كما سنرى في ArrayDisplay
وبعض الأوامر في المصفوفات ,, مثل أمر عد الصفوف ونحوها

انتظرونا ,,
والسلام عليكم ورحمة الله وبركاته

ashalshaikh · 5 يوليو 2009

Future Tank X-1 قال:
[/CENTER]

اقول خلك من الاوتو وتابع فضايح برامج الحمايه !!
وانت السبب !!
:bleh:[/CENTER]

:hh::hh::hh:

himoScript قال:
شباب ممتاز هذا الكلام والله

خلينى اقول لكم شئ

وهو سؤال صراحه

يوجد عندنا برنامج قمنا بتشغيله وهو الأن فى شريط المهام ونحن نعمل على برنامج اخر
البرنامج الأول اسمه x
لو أردنا اخفاء برنامج x من شريط المهام ؟. ماذا نفعل ؟؟؟؟

WinSetState(@SW_HIDE(
طبعا مع وضع معلومات النافذة ,,
بس هذا للتقريب

أرجو إنك ما تحرمنا من طلتك ,,

himoScript قال:
وبالمره عندنا امر نود شرحه وهو

WinFlash

فى شريط المهام

عندنا نوافذ كثيره طيب نريد نافذه معينه نعمل عليها بكثره ولكن ضائعه وسط النوافذ
هذا الأمر يقوم بعمل فلاش عليها لكى تظهر لنا

مثال

WinFlash('Untitled - Notepad',"", 4, 500)

سهل وبسيط

أمر جميل ورائع ,,
نحتاج إليه كثيرا ,,
شكرا لك ,,

لا تحرمنا من طلتك !!

القنـاص · 5 يوليو 2009

طيب ايش هي البرامج اللي بنسويها مع بعض ؟؟؟

himoScript · 5 يوليو 2009

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

مميز بوجودك

على فكره ماتنسى تضيف كل شئ فى الصفحة الرئيسية أغلب المتابعين من منتديات أخرى مشهوره
يأتون للصفحة الرئيسية لمشاهده الجديد
لاتنسى تضيف كل شئ ولو بسيط

تحياتى لك وراح ااتابع

وهديه لك وللجميع

IMAN FIXER

تعمل ايه لو علق برنامج idman ؟ يهنق الجهاز حتى يحمل الشئ وممكن يعمل مشكله
طيب طيب ولايهمك خوز هذا الكور core

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

ملاحظات التشغيل
فكره عمل البرنامج هى تعطيل برنامج idman مؤقت ولو كان يعمل فى الذاكره ولتشغيله مره اخرى اضغط على السكربت مره كمان

هيمو وين السورس كودج ياولد <<< مااقدر اتأخر ولو أنه معروض للبيع

سورس كود

PHP:

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.2.10.0
 Author:         Ibrahim

 Script Function:
    IDM FIXER.

#ce ----------------------------------------------------------------------------

;

if fileexists(@programfilesdir & "\Internet Download Manager\IDMan.xx1") then 
    $hs1=msgbox(4,"البرنامج معطل حاليا","هل تريد العوده للوضع الطبيعى وتشغيل البرنامج؟")
if $hs1 =7 Then
    exit
    else 
    filemove(@programfilesdir & "\Internet Download Manager\IDMan.xx1" , @programfilesdir & "\Internet Download Manager\IDMan.exe")
    run (@programfilesdir & "\Internet Download Manager\IDMan.exe")
    exit
endif
endif


; 
if processexists("idman.exe") then
$hs=msgbox(4,"البرنامج يعمل حاليا","البرنامج يعمل فى الذاكره تأكد من انتهاء العمل عليه قبل المتابعه والا اضغط الزر نو")
if $hs= 7 Then
    Exit
    else
    processClose("idman.exe")
    processClose("iemonitor.exe")
    filemove(@programfilesdir & "\Internet Download Manager\IDMan.exe" , @programfilesdir & "\Internet Download Manager\IDMan.xx1") 
    exit
endif
endif
processClose("idman.exe")
    processClose("iemonitor.exe")
    filemove(@programfilesdir & "\Internet Download Manager\IDMan.exe" , @programfilesdir & "\Internet Download Manager\IDMan.xx1")

اهداء الى
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

وتحياتى للجميع وكل المشاركين

ashalshaikh · 5 يوليو 2009

القنـاص قال:
طيب ايش هي البرامج اللي بنسويها مع بعض ؟؟؟

لا تستعجل رزقك ,,

ما علقت على الدروس ,,
والله أنا :er::er::er:

himoScript قال:
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

مميز بوجودك

على فكره ماتنسى تضيف كل شئ فى الصفحة الرئيسية أغلب المتابعين من منتديات أخرى مشهوره
يأتون للصفحة الرئيسية لمشاهده الجديد
لاتنسى تضيف كل شئ ولو بسيط

تحياتى لك وراح ااتابع

وهديه لك وللجميع

IMAN FIXER

تعمل ايه لو علق برنامج idman ؟ يهنق الجهاز حتى يحمل الشئ وممكن يعمل مشكله
طيب طيب ولايهمك خوز هذا الكور core

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

ملاحظات التشغيل
فكره عمل البرنامج هى تعطيل برنامج idman مؤقت ولو كان يعمل فى الذاكره ولتشغيله مره اخرى اضغط على السكربت مره كمان

هيمو وين السورس كودج ياولد <<< مااقدر اتأخر ولو أنه معروض للبيع

سورس كود

PHP:

#cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.10.0 Author: Ibrahim Script Function: IDM FIXER. #ce ---------------------------------------------------------------------------- ; if fileexists(@programfilesdir & "\Internet Download Manager\IDMan.xx1") then $hs1=msgbox(4,"البرنامج معطل حاليا","هل تريد العوده للوضع الطبيعى وتشغيل البرنامج؟") if $hs1 =7 Then exit else filemove(@programfilesdir & "\Internet Download Manager\IDMan.xx1" , @programfilesdir & "\Internet Download Manager\IDMan.exe") run (@programfilesdir & "\Internet Download Manager\IDMan.exe") exit endif endif ; if processexists("idman.exe") then $hs=msgbox(4,"البرنامج يعمل حاليا","البرنامج يعمل فى الذاكره تأكد من انتهاء العمل عليه قبل المتابعه والا اضغط الزر نو") if $hs= 7 Then Exit else processClose("idman.exe") processClose("iemonitor.exe") filemove(@programfilesdir & "\Internet Download Manager\IDMan.exe" , @programfilesdir & "\Internet Download Manager\IDMan.xx1") exit endif endif processClose("idman.exe") processClose("iemonitor.exe") filemove(@programfilesdir & "\Internet Download Manager\IDMan.exe" , @programfilesdir & "\Internet Download Manager\IDMan.xx1")

اهداء الى
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

وتحياتى للجميع وكل المشاركين

تسلم تسل م ياغالي ,,
هدية رااااااااااائعة و فكرة ذهبية ,,
سلمت يداااااااااااااك
وجزاك الله ألف ألف خير ,,
ولا تحرمنا من طلتك ياغالي ,,
وهذا الكود ملون ومرتب ,, عشان الإخوة يستفيدون

k:
الكود فعلا راااااااااااااائع ,,
مثال أكثر من ممتاااااااااااااااااااااز !! وتطبيق أكثر من رااااااااااائع ,
شكرا لك ,,

كود:

[COLOR=#669900]#cs ----------------------------------------------------------------------------[/COLOR]

[COLOR=#669900]    AutoIt Version: 3.2.10.0[/COLOR]
[COLOR=#669900]    Author:         Ibrahim[/COLOR]

[COLOR=#669900]    Script Function:[/COLOR]
[COLOR=#669900]    IDM FIXER.[/COLOR]

[COLOR=#669900]#ce ----------------------------------------------------------------------------[/COLOR]

[COLOR=#009933];[/COLOR]

[COLOR=#0000ff]If[/COLOR] [COLOR=#000090]FileExists[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.xx1"[/COLOR][COLOR=#ff0000])[/COLOR] [COLOR=#0000ff]Then[/COLOR]
    [COLOR=#aa0000]$hs1[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"البرنامج معطل حاليا"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"هل تريد العوده للوضع الطبيعى وتشغيل البرنامج؟"[/COLOR][COLOR=#ff0000])[/COLOR]
    [COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$hs1[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]7[/COLOR] [COLOR=#0000ff]Then[/COLOR]
        [COLOR=#0000ff]Exit[/COLOR]
    [COLOR=#0000ff]Else[/COLOR]
        [COLOR=#000090]FileMove[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.xx1"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.exe"[/COLOR][COLOR=#ff0000])[/COLOR]
        [COLOR=#000090]Run[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.exe"[/COLOR][COLOR=#ff0000])[/COLOR] 
    [COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]


[COLOR=#009933];[/COLOR]
[COLOR=#0000ff]If[/COLOR] [COLOR=#000090]ProcessExists[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"idman.exe"[/COLOR][COLOR=#ff0000])[/COLOR] [COLOR=#0000ff]Then[/COLOR]
    [COLOR=#aa0000]$hs[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#000090]MsgBox[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ac00a9]4[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"البرنامج يعمل حاليا"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#9999cc]"البرنامج يعمل فى الذاكره تأكد من انتهاء العمل عليه قبل المتابعه والا اضغط الزر نو"[/COLOR][COLOR=#ff0000])[/COLOR]
    [COLOR=#0000ff]If[/COLOR] [COLOR=#aa0000]$hs[/COLOR] [COLOR=#ff0000]=[/COLOR] [COLOR=#ac00a9]7[/COLOR] [COLOR=#0000ff]Then[/COLOR]
        [COLOR=#0000ff]Exit[/COLOR]
    [COLOR=#0000ff]Else[/COLOR]
        [COLOR=#000090]ProcessClose[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"idman.exe"[/COLOR][COLOR=#ff0000])[/COLOR]
        [COLOR=#000090]ProcessClose[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"iemonitor.exe"[/COLOR][COLOR=#ff0000])[/COLOR]
        [COLOR=#000090]FileMove[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.exe"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.xx1"[/COLOR][COLOR=#ff0000])[/COLOR]
        [COLOR=#0000ff]Exit[/COLOR]
    [COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#0000ff]EndIf[/COLOR]
[COLOR=#000090]ProcessClose[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"idman.exe"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=#000090]ProcessClose[/COLOR][COLOR=#ff0000]([/COLOR][COLOR=#9999cc]"iemonitor.exe"[/COLOR][COLOR=#ff0000])[/COLOR]
[COLOR=Navy]FileMove[/COLOR][COLOR=Red]([/COLOR][COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.exe"[/COLOR][COLOR=#ff0000],[/COLOR] [COLOR=#ff33ff]@ProgramFilesDir[/COLOR] [COLOR=#ff0000]&[/COLOR] [COLOR=#9999cc]"\Internet Download Manager\IDMan.xx1"[/COLOR][COLOR=#ff0000])[/COLOR]

بارك الله فيك ,,
وأشكر مرة أخرى الأخ (Hemo Script )

القنـاص · 5 يوليو 2009

خطا في التلوين

كود:

[B][FONT=Times New Roman][COLOR=Black][SIZE=3][B]FGKQNBD[COLOR=#000090]Hex[/COLOR]it[/color]
[/B][/SIZE][/COLOR][/FONT][/B]

القنـاص · 5 يوليو 2009

FileMovFAMKKJPQHexpVPXMDCGQX([/color]@ProgramFilesDir & "\Internet Download Manager\IDMan.exe", @ProgramFilesDir & "\Internet Download Manager\IDMan.xx1")[/COLOR]

ashalshaikh · 6 يوليو 2009

القنـاص قال:
filemovfamkkjpqhexpvpxmdcgqx([/color]@programfilesdir & "\internet download manager\idman.exe", @programfilesdir & "\internet download manager\idman.xx1")[/color]

جزاك الله ألف خير ,,
بس ..........:er:

ashalshaikh · 6 يوليو 2009

يا شباب وينكم ؟!!
أنا ماني شايف أحد !!

HaMuDi · 7 يوليو 2009

ياولد سيكربت التلوين مش للبيع :d:
ولا انت بس مريحها :bleh:

zoro779 · 7 يوليو 2009

عندى سؤال عن شاشة SPLASH SCREEN من هنا

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

كيف يمكن عمل واحدة مثلها لانى وجدتها فى برنامج محمول تعمل عند فتحة لثوانى ثم تغلق واعتقد انها مصنوعة بالاوتوات

القنـاص · 7 يوليو 2009

zoro779 قال:
عندى سؤال عن شاشة SPLASH SCREEN من هنا

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

كيف يمكن عمل واحدة مثلها لانى وجدتها فى برنامج محمول تعمل عند فتحة لثوانى ثم تغلق واعتقد انها مصنوعة بالاوتوات

يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي

فدى الرسول · 7 يوليو 2009

السلام عليكم يا شيخ
جزاك الله خير ع الشرح الجميل ولكن اريد ان اعرف فى هذا

PHP:

 #Include <Array.au3>                                ; تضمين أوامر مصفوفات جديدة
 #Include <File.au3>                                     ; تضمين أوامر الملفات جديدة
 

  $FileName=(@WindowsDir&"\system32\OEMInfo.ini");اسم الملف

  $Count=_FileCountLines($FileName); قراءة عدد أسطر الملف وحفظ الناتج في المتغير

  Dim $Array[$Count+1]; تعريف مصفوفة طولها بعدد الأسطر

  for $var=1 To $count
$Array[$var]=FileReadLine($FileName,$var);تعريف كل من المصفوفة بسطر ويزداد مع الدوران
 Next


   MsgBox(64,"السطر الأول",$Array[1]);عرض السطر الأول
 _ArrayDisplay($Array);عرض المصفوفة كاملة

ما معنى هذه

PHP:

for $var=1 To $count

هل معناها يبدا العد من واحد

فدى الرسول · 7 يوليو 2009

السلام عليكم ورحمت الله وبركاته
انا سويت تطبيق بسيط (انا سويته ع السريع اعرف ان يحتاج بعض اوامر if ولكن العجله ههه)
التطبيق

PHP:

#include<file.au3>
$cin=_FileCountLines(@WindowsDir&"\system32\OEMInfo.ini")
MsgBox(4,"the oem","ملف المعلومات يحتوى على"&$cin&"سطر")
$in=InputBox("السلام عليكم","اكتب رقم السطر الذى تريد قرائته")
$F=FileReadLine(@WindowsDir&"\system32\OEMInfo.ini",$in)
MsgBox(0,"السلام عليكم","السطر رقم"&$in&"حتوى على"&@CRLF&$F)

هل هو جميل
لمن لا يعرف ملف OEMInfo.ini هو ملف خاص بمعلومات النسخه الخاصه بك ويمكنك تعديله كما تشاء (المعلومات يمكنك رؤيتها بالضغط على My Computer واختار خصائص)
انتظر ردكم الكريم مع العلم ياشيخ انا اريد ان اعرف اذا وضع قيمه خاطئه او حرف او لم يضع شئ كيف اخرج رساله خطاُ احتاج رد جميل منك
وشكرااااااااااااااااااا

ashalshaikh · 7 يوليو 2009

HaMuDi قال:
ياولد سيكربت التلوين مش للبيع :d:
ولا انت بس مريحها :bleh:

:q::q:

فدى الرسول قال:

السلام عليكم يا شيخ
جزاك الله خير ع الشرح الجميل ولكن اريد ان اعرف فى هذا

PHP:

 #Include <Array.au3>                                ; تضمين أوامر مصفوفات جديدة
 #Include <File.au3>                                     ; تضمين أوامر الملفات جديدة
 

  $FileName=(@WindowsDir&"\system32\OEMInfo.ini");اسم الملف

  $Count=_FileCountLines($FileName); قراءة عدد أسطر الملف وحفظ الناتج في المتغير

  Dim $Array[$Count+1]; تعريف مصفوفة طولها بعدد الأسطر

  for $var=1 To $count
$Array[$var]=FileReadLine($FileName,$var);تعريف كل من المصفوفة بسطر ويزداد مع الدوران
 Next


   MsgBox(64,"السطر الأول",$Array[1]);عرض السطر الأول
 _ArrayDisplay($Array);عرض المصفوفة كاملة

ما معنى هذه

PHP:

for $var=1 To $count

هل معناها يبدا العد من واحد

وعليكم السلام
يبدأ من واحد لأننا نريد ,
السطر الأول في الصف 1 ،, الثاني في الصف 2
ونرد يبقى الصف 0 فارغ ,, أو فيه عدد الصفوف مثلا ,,
ولكن انننننننننتبه ,,
شاهد تعرف المصفوفة

كود:

Dim $Array[$Count+1]

لأن بهذه الطريقة سوف تكون عدد الصفوف هو :: عدد الأسطر + واحد
لأننا تجاهنا الصف الأول الذي هو 0
ولو لم تضف الواحد لكان خطأ !! :cr:

فدى الرسول قال:
السلام عليكم ورحمت الله وبركاته
انا سويت تطبيق بسيط (انا سويته ع السريع اعرف ان يحتاج بعض اوامر if ولكن العجله ههه)
التطبيق

PHP:

#include<file.au3> $cin=_FileCountLines(@WindowsDir&"\system32\OEMInfo.ini") MsgBox(4,"the oem","ملف المعلومات يحتوى على"&$cin&"سطر") $in=InputBox("السلام عليكم","اكتب رقم السطر الذى تريد قرائته") $F=FileReadLine(@WindowsDir&"\system32\OEMInfo.ini",$in) MsgBox(0,"السلام عليكم","السطر رقم"&$in&"حتوى على"&@CRLF&$F)

هل هو جميل
لمن لا يعرف ملف OEMInfo.ini هو ملف خاص بمعلومات النسخه الخاصه بك ويمكنك تعديله كما تشاء (المعلومات يمكنك رؤيتها بالضغط على My Computer واختار خصائص)
انتظر ردكم الكريم مع العلم ياشيخ انا اريد ان اعرف اذا وضع قيمه خاطئه او حرف او لم يضع شئ كيف اخرج رساله خطاُ احتاج رد جميل منك
وشكرااااااااااااااااااا

وعليكم السلام
التطيبق فكرته جميلة جدا ,,
<<< أنا اخترت ملف السيستم لأنه موجود في كل جهاز

حتى لا يخرج المثال خطأ !!
ولكن الملف الذي تقصده لم أجده في جهازي :?:
المهم ,,
هذا هو الكود بعد التعديل الذي طلبته ,,
استنتج ما تريده :d:

كود:

[color=#9999cc][color=#f000ff]#Include[/COLOR]<file.au3>[/COLOR][color=#009933][/COLOR]
[color=#aa0000]$cin[/COLOR][color=#ff0000]=[/color][color=#0080ff]_FileCountLines[/color][color=#ff0000]([/color][color=#ff33ff]@WindowsDir[/color][color=#ff0000]&[/color][color=#9999cc]"\system32\OEMInfo.ini"[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#aa0000]$Msg[/COLOR] [color=#ff0000]=[/color] [color=#000090]MsgBox[/color][color=#ff0000]([/color][color=#ac00a9]4[/color][color=#ff0000],[/color][color=#9999cc]"the oem"[/COLOR][color=#ff0000],[/color][color=#9999cc]"ملف المعلومات يحتوى على"[/COLOR][color=#ff0000]&[/color][color=#aa0000]$cin[/COLOR][color=#ff0000]&[/color][color=#9999cc]"سطر"[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#0000ff]If[/color] [color=#aa0000]$Msg[/COLOR] [color=#ff0000]=[/color] [color=#ac00a9]7[/color] [color=#0000ff]Then[/color] [color=#0000ff]Exit[/color][color=#009933][/COLOR]
[color=#aa0000]$in[/COLOR][color=#ff0000]=[/color][color=#000090]InputBox[/color][color=#ff0000]([/color][color=#9999cc]"السلام عليكم"[/COLOR][color=#ff0000],[/color][color=#9999cc]"اكتب رقم السطر الذى تريد قرائته"[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#0000ff]If[/color] [color=#aa0000]$in[/COLOR] [color=#ff0000]=[/color] [color=#9999cc]""[/COLOR] [color=#0000ff]Then[/color][color=#009933][/COLOR]
    [color=#000090]MsgBox[/color] [color=#ff0000]([/color][color=#ac00a9]1[/color][color=#ac00a9]6[/color][color=#ff0000],[/color][color=#9999cc]""[/COLOR][color=#ff0000],[/color][color=#9999cc]"أنت لم تضع شيء"[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
    [color=#0000ff]Exit[/color][color=#009933][/COLOR]
[color=#0000ff]EndIf[/color][color=#009933][/COLOR]
[color=#aa0000]$F[/COLOR][color=#ff0000]=[/color][color=#000090][color=#000090]FileRead[/color]Line[/color][color=#ff0000]([/color][color=#ff33ff]@WindowsDir[/color][color=#ff0000]&[/color][color=#9999cc]"\system32\OEMInfo.ini"[/COLOR][color=#ff0000],[/color][color=#aa0000]$in[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]
[color=#000090]MsgBox[/color][color=#ff0000]([/color][color=#ac00a9]0[/color][color=#ff0000],[/color][color=#9999cc]"السلام عليكم"[/COLOR][color=#ff0000],[/color][color=#9999cc]"السطر رقم"[/COLOR][color=#ff0000]&[/color][color=#aa0000]$in[/COLOR][color=#ff0000]&[/color][color=#9999cc]"حتوى على"[/COLOR][color=#ff0000]&[/color][color=#ff33ff][color=#ff33ff]@CR[/color]LF[/color][color=#ff0000]&[/color][color=#aa0000]$F[/COLOR][color=#ff0000])[/color][color=#009933][/COLOR]

فدى الرسول · 7 يوليو 2009

السلام عليكم ورحمت الله وبركاته
حياك الله ياشيخ.....
بخصوص ملف الاومى فهو يجب ان يكون فى كل نسخه
ممكن يكون الاسم متغير او مضاف $ كدا لكن يجب ان يكون
------------------------------------------------------------
تمام الكود كدا تمام انا عرف الاختلاف يعنى اعطى له لو ان الاقواس فارغه يخرج رساله خطا تماااااااااااااااااام
===========================
فى انتظار امثلتك ودروسك الرائعه

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى محترف

توقيع : Future Tank X-1

زيزوومى مميز

توقيع : himoScript

زيزوومى مميز

توقيع : himoScript

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى مميز

زيزوومى مميز

توقيع : himoScript

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى مميز

زيزوومى مميز

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى فضى

توقيع : ashalshaikh

الله يرحمه ويسكنة الجنه

توقيع : HaMuDi

زيزوومى مبدع

توقيع : zoro779

زيزوومى مميز

زيزوومى مبدع

توقيع : فدى الرسول

زيزوومى مبدع

توقيع : فدى الرسول

زيزوومى فضى

توقيع : ashalshaikh

زيزوومى مبدع

توقيع : فدى الرسول