قم بمتابعة الفيديو أدناه لمعرفة كيفية تثبيت موقعنا كتطبيق ويب على الشاشة الرئيسية.
ملاحظة: قد لا تكون هذه الميزة متاحة في بعض المتصفحات.
$var = 30
[CENTER]$var1 = 25
[CENTER]if $var > $var1 then
msgbox(0,"","العدد الاكبر 30")
else
msgbox(0,"","العدد الاصغر 25")
endif
msgbox(0,"","النتيجة ")[/CENTER]
[/CENTER]
[COLOR=blue]$var = 30[/COLOR]
[COLOR=darkred]$var1 = 25[/COLOR]
[COLOR=red]if[/COLOR] [COLOR=darkred]$var[/COLOR] [COLOR=green]>[/COLOR] [COLOR=darkred]$var1[/COLOR] [COLOR=purple]then[/COLOR]
msgbox(0,"","[COLOR=blue]العدد الاكبر 30[/COLOR]")
[COLOR=darkorange]else[/COLOR]
msgbox(0,"","[COLOR=darkred]العدد الاصغر 25[/COLOR]")
[COLOR=navy]endif[/COLOR]
msgbox(0,"","النتيجة ")
أريد الرقم في صندوق النتيجةوضح أكثر ياغالي .. لكي استطيع فهمك
msgbox(0,"","النتيجة 30أما 25 ")
$var = 30
$var1 =25
if $var > $var1 then
msgbox(0,""," 30 أنا الاول أكبر")
else
msgbox(0,"","25 ثاني أكبر من الاول")
endif
msgbox(0,"","النتيجة ")
EndIf
نعم هذا هواها ,, قصدك اذا تحقق الشرط يظهر النتيجة مع الرقم ؟
[COLOR=#000000][FONT=Courier New][COLOR=#0000bb]$dir[/COLOR][COLOR=#007700]=[/COLOR][COLOR=#0000bb]DirCopy[/COLOR][COLOR=#007700](@[/COLOR][COLOR=#0000bb]ProgramFilesDir [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#dd0000]"\WinRAR"[/COLOR][COLOR=#007700], @[/COLOR][COLOR=#0000bb]DesktopDir [/COLOR][COLOR=#007700]&[/COLOR][COLOR=#dd0000]"\BackUpFolder" [/COLOR][COLOR=#007700],[/COLOR][COLOR=#0000bb]1[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
if [/COLOR][COLOR=#0000bb]$dir[/COLOR][COLOR=#007700]=[/COLOR][/FONT][FONT=Courier New][COLOR=#0000bb]1 Then
MsgBox[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000bb]0[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]""[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]"done"[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
Else
[/COLOR][COLOR=#0000bb]MsgBox[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000bb]0[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]""[/COLOR][COLOR=#007700],[/COLOR][COLOR=#dd0000]"error"[/COLOR][/FONT][FONT=Courier New][COLOR=#007700])
EndIf
[/COLOR][COLOR=#0000bb][/COLOR][/FONT][/COLOR]اذا لم يكن موجود المجلد المنسوخه اليه الملفات فانه سيتم محاولة انشاءه تلقائياً
والله انا جيت اجرب هذا الامر
جاتني رسالة خطأPHP:if FileExists "c:\boot.ini" Then MsgBox ( 0+64+262144, "Note","You are runnig Windows XP") Else MsgBox ( 0+64+262144, "Note","You are runnig Windows Vista or 7") EndIf
![]()
ليش وشنو الحل
FileExists[COLOR=Red]([/COLOR]"c:\boot.ini"[COLOR=Red])[/COLOR]
شي طيب بس للعلم واعتقد واتوقع ان بعض المسارات تختلف من ويندوز اكس بي الى ويندوز سفن
لذلك اقترح عليكم تسوا لنا درس يشرح لنا تنفيذ الاوامر الفلانية في الاكس بي وان كان نظام التشغيل سفن فنفذ الاوامر الاخرى
if FileExists(@HomeDrive &"\boot.ini") Then
; هنا قم بوضع الاكواد والسورسات التي تريد تنفيذها في ويندوز اكس بي
Else
; هنا قم بوضع الاكواد التي تريد تنفيذها في ويندوز سفن
EndIf
يجب عليك تسجيل الدخول او تسجيل لمشاهدة الرابط المخفي
وعن إذن اخواني
hmammou & alzri2
ممكن اعدل الكود لكي يصبح اكثر احترافي وفعالية
كود:if FileExists(@HomeDrive &"\boot.ini") Then ; هنا قم بوضع الاكواد والسورسات التي تريد تنفيذها في ويندوز اكس بي Else ; هنا قم بوضع الاكواد التي تريد تنفيذها في ويندوز سفن EndIf
OSVerision
Returns one of the following: "WIN_2008R2", "WIN_7", "WIN_2008", "WIN_VISTA", "WIN_2003", "WIN_XP", "WIN_XPe", "WIN_2000".
If @OSVersion = "WIN_7" Then MsgBox(64, "Info", "You are at windows 7 !!")
If @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows vista !!")
If @OSVersion = "WIN_XP" Then MsgBox(64, "Info", "You are at windows XP !!")
If @OSVersion = "WIN_7" Or @OSVersion = "WIN_VISTA" Then MsgBox(64, "Info", "You are at windows 7 or windows vista !!")
سوعال خارجي :d:
وراه ذي مو راضيه تشتغل ؟
كنها محذوفة
![]()
جربتها على اكسبي وسفن وتعيي تشتغل
سوعال خارجي :d:
وراه ذي مو راضيه تشتغل ؟
كنها محذوفة
![]()
جربتها على اكسبي وسفن وتعيي تشتغل