Maverick

ال list هي عبارة عن stack لكنها متغيرة الحجم. اذ انها من المفروض ان تقبل حفظ اكبر عدد من القيم. لذلك فعمل ال list هو مطابق لعمل الstack لكن لايجب ان يكون هناك حد لعدد القيم التي تريد حفظها او يجب ان يكون الحد كبير جدأ, ارجو تصحيحي من قبل الذين لديهم معرفة اكثر…

عند الانتهاء من عمل ال log لجهاز الضحية يجب عليك ان تحفظها بالجهاز في .txt و من ثم ارسالها الى جهاز ال Client حيث ان الجهاز الذي يعمل على جهاز الضحية هو ال Server عمل ال Ket Logger هو مهمة سهلة لكن تحتاج بعض الجهد :)

Ado.Close FileCopy("C:\DbaseFile","C:\Destination") يجب ان يكون هناك Textbox Dim Sql as string Sql = "select * from table where date=" & Text1.Text

قم بحفظ الlogs على جهاز الضحية ثم ارساها الى ال Server سهلة :)

نعم فقبل ان تستدعي ال rand يجب عليك استدعاء Randomise Private Sub Form_Load() Randomize MsgBox Int(Rnd * 10) End Sub

يجب ان ترسل كوماندز من ال Client الى ال Server eg: WinsockClient.SendData "OpenCDROM" و في ال Server: Private Sub WinsockServer_DataArrival(byval Byestotal as long) Dim Data as string WinsockServer.GetData Data If Data = "OpenCDROM" then افتح ال cd rom end if …

ارسل الفايل اللي و سأصلحه و ارفقه

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

هذا مثال على التواصل مع MSn Messenger من الممكن اللا يعمل على Windows XP لانك يجب ان تزيل WIndows messenger من جهازك. MSN example.zip

Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean) تستخدم لمعرفة الخطأ الذي حصل اثناء ال connection مثال: Privat…

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

SQL = "select * from history table" do while not ADO.EOF List1.additem ADO.Fieldbyname("Date").text loop

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

لعمل برنامج يتعامل مع الشبكات يجب اضافة الاداة من Project->Components->Microsoft Winsock و من ثم كتابة الكود لها. لعمل برامج الكلاينت يجب عليك معرفة الدالات الاتية: Connect(RemoteHost,Port): هذه هو ال function الذي يعمل Connection مع المضيف. Close() لاغلاق الC…

انا اكتب بالدرس انتظروا :)

أخواني و اخواتي المبرمجين العرب هذا هو مثال على استعمال ال winsock في برنامج Client/Server for chat ادعو الله ان اكون قد افدتكم. انا جاهز الى اجابة اي سؤال عن هذه الاداه Client_Sever.zip

هذا الكود جيد لكنه لن يتم تنفيذه لان i لن تتحول قيمتها الى 100 :) Private sub Form_Load() Me.show Timer1.Interval = 1000 '1second end sub Private sub Timer1_Timer() Form2.show end sub

http://www.proxy2004.tk

Public: Fo frm:string; uses UnitA,UnitB,UNitC; //on close button click event if frm='A' then frmA.Show else if frm='B' then frmb.show else frmC.show;

شوووو؟؟؟؟ هذا منتدى عربي