كيف يمكننى من معرفة عدد مرات إنزال برنامج معين ؟؟

http://www.arabmoheet.com/topic.asp?topic_no=110

اعتقد ان الموضوع هو المطلوب وهو بلغة asp :)

لقد حاولت فتح الصفحة التي ذكرها أخي anwarica عدة مرات و لم انجح، فإن لم تكن أخي codefinder قد حصلت على جواب أخبرني، حتى نرى ماذا يمكن أن نساعد في الـ ASP أيضاً بعون الله

الخى العزيز

انا لم اصل الى شئ و لهاذا لم اقم بالرد نظرا ً لتعقيد الموقف على

و لكن من ما فهمتة انها عملية متوالية :

1 + 1 = 2

2 + 1 = 3

3 + 1 = 4

و هكذا و بالطبع انا لا اعرف asp فلا استطيع ان اقم بعملها !!!

و شكرا ً للجميع

الفكرة ببساطة هي كالآتي:

يوجد لديك وصلة لتنزيل ملف، بدلاً من تنزيل الملف مباشرة من خلال هذه الوصلة: تقوم بجعل الضغط على هذه الوصلة يذهب بك إلى صفحة لاحتساب العد و من ثم تنزيل الملف.

مالذي يجري؟

ألذي يحصل أن هذه الصفحة تقرأ في قاعدة البيانات (على الأرجح ستحتاج إلى قاعدة بيانات أو إذا كان الأمر بسيطاً قد يكتفي البعض بـ text files) البيانات الخاصة بالبرنامج المعني و منها كم مرة تم تنزيله (المجموع التراكمي) ثم يقوم بإضافة واحد إلى هذا المجموع التراكمي، ومن ثم تقوم الصفحة بنقلك لوصلةى التنزيل الخاصة بالملف

و اعتقد أنه مهما كانت اللغة المستخدمة فقإنها ستكون بنفس الأسلوب و الله أعلم

أخي كل ما تحتاجه عمل دالة جافا سكريبت تقوم بفتح نافذة جديدة

هذه النافذة يمرر لها اسم الصفحة وليكن downloads.asp و رقم معرف للملف الذي سيتم تحميله وليكن FileID و بالتالي ستقوم بكتابة التالي في صفحتك العادية :

<a href="javascript:window.open('downloads.asp?FileID=<%=rs("id")%>','Downloads','width=300,height=300')">
تحميل الملف
</a>

الان تقوم بعمل صفحة Downloads والتي تقوم بزيادة عدد مرات التحميل مرة واحدة ثم تقوم بتحميل الملف كالتالي :

downloads.asp

<%
Function GetFilePath(id)
 IF id<>"" THEN
  Set tmp=cn.execute("Select fileName FROM FilesTable where FileID="&id)
 END IF
GetFilePath="http://domain.com/" & tmp("fileName") 
End Function

Application.Lock
 cn.execute("Update TableName Set hits=hits+1")
Application.UnLock

Response.Redirect GetFilePath(Request.QueryString("FileID"))
%>

سوف تقوم الصفحة في الأول بغلق التطبيق من أجل ضمان حساب نقطة إضافية لعدد مرات تحميل الملف ثم يتم تحويل الصفحة لعنوان الملف و طبعا عن طريق دالة تقوم بإرجاع مسار الملف مع إسمه.

أعتقد أن الكود واضح..

تحياتي لك و لمشرف القسم :)

مشكور أخي محمد، و تحياتي لك أيضاً.

و هل لي من إضافات بعد كلامك فأنت أستاذنا هنا

:)

شكرا لك أخي محمد ..

إخواني أنا آاسف فقد نسيت شيئا سهوا و جل من لا يسهو خاصة أني كتبت الكود لايف ..المهم نسيت عند زيادة عدد تحميل الملف ان احدد رقم الملف و هذا هو التصحيح

Application.Lock
cn.execute("Update TableName Set hits=hits+1 where fID=" & id)
Application.UnLock