المنتدى العربي الاقوى في عالم النمبز بادارة : صهيب الاردن (نمبز،نمبوز،نيمباز،نيمبز،klf.،برامج نمبز،فلود،غرف،رومات،دردشه،اصدارات،خدع،برامج،جاجيم،جابيم،بانديون،رد الي،تخمين)
 
الرئيسيةالرئيسية  مركز رفع الصور  س .و .جس .و .ج  بحـثبحـث  البوابةالبوابة  التسجيلالتسجيل  دخولدخول  
مرحبا زائر ، يتوفر نكات عربية للبيع لدى صهيب الاردن ارسل واتس أب للرقم 00962796231801

شاطر | 
 

 عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
فارس_الأحلام
نائب المدير العام
نائب المدير العام


لاقيني عالنمبز : welo~2010@nimbuzz.com


الجنس : ذكر
عدد المساهمات : 1460
التـقـيـيـم : 104
انــا مــن : `لــــــيــــــ♥ـــبـــــــيــــــا`
عـمـري: : 21
تاريخ التسجيل : 08/12/2011

مُساهمةموضوع: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   26/5/2012, 11:47 pm

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


دا اسهل طريقة تقدر
تعمل بيها اتصال بسرفر النيم باز بفجوالبيزك6
بس لازم الاول يكون
عندك خلفية فى الفجول

الاول هتفتح الفجول بيزك
عادى وتختار stander
project

بعدها تحط 2 صندوق نص و
2 ليبل و2 كوماند بوتن و 1 ليست بوكس

وتخلى التكست متاع ليبل
1 = id

وتحط ادمها التكست رقم 1
الى بيكون اسمه text1

تحتها تحت اليبل 2
وتخلى التكست بتاعها = password

وتحط ادمها التكست
التانى الى بيكون ب اسم text2

والكوماند 1 تسميها login

واكوماند2 تسميها logof

وتحط اليست بوكس تحط

بعدها هتسدعى اداة
ونسوك والى مش عارف هنقولو اازاى

تتدوس فى صندوق الادوات
كليك يمين وتختار compents

هتفتحلك لستة تتدور
فيها ع الكلمة هدى

microsoft wibsock control 6.0

تعلم عليها وتضغط اوك
هتظهر عندك فى صندوق الادوات تكتين عليها استدعتها كدا خلاص

نيجى ل الاكواد

هتحط فى كوماند 1
الكودا دا
winsock1.close
Winsock1.remotehost="openfire.nimbuzz.com"
Winsock1.remoteport=5222
Winsock1.connect

وتحط فى الكوماند 2
الكود دا
winsock1.close
list1.additem "connection ended"



وتاخد الكود الى جى هدا
كوبى وتحطه

Private Sub Winsock1_Connect()
Winsock1.SendData "to='nimbuzz.com' version='1.0' xmlns:stream='http://etherx.jabber.org/streams'
xml:lang='ar' >"
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim ambil As String
Winsock1.GetData ambil
ambil = Replace(ambil, """", "'")
If InStr(ambil, "xmlns='http://jabber.org/features/compress'>zlibxmlns='urn:ietfarams:xml:ns:xmpp-sasl'>PLAINDIGEST-MD5xmlns='http://jabber.org/features/iq-register'/>")
Then
Winsock1.SendData "to='nimbuzz.com'>"
& Text1.Text & "
" &
Text2.Text & "
ddddddddddd
"
End If
DoEvents
If InStr(ambil, "id='NLgn'/>") Then
List1.AddItem "login at " & Text1.Text & "=Succsed"
End If
If InStr(ambil, "id='NLgn'>" &
Text1.Text & "
" & Text2.Text
&
"
ddddddddddd
code='401' type='auth'>
")
Then
List1.AddItem "login at " & Text1.Text & " =Faild"
End If
End Sub

واحفظ مشروعك وشغله

وافتحه وجرب حط اى ميل
مرة بباسورد صح ومرة بباسوورد غلط
هيقولك فى الصح صح والغلط
غلط



واخيرا انتهيت من الشرح


نتمني ان تكونو قد استفدتم من الشرح ولاي استفسار


welo~2010@nimbuzz.com

او زورو:

www.welo2010.malware-site.www
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://[welo~2010@nimbuzz.com  [www.welo2010.blogspot.com http://facebook.com/Ala.Alhmami
marwan7100
عضو جديد
عضو جديد


عدد المساهمات : 1
التـقـيـيـم : 0
تاريخ التسجيل : 15/01/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   25/6/2012, 5:28 pm

If InStr(ambil, "xmlns='http://jabber.org/features/compress'>zlibxmlns='urn:ietfarams:xml:ns:xmpp-sasl'>PLAINDIGEST-MD5xmlns='http://jabber.org/features/iq-register'/>")
Then
Winsock1.SendData "to='nimbuzz.com'>"
& Text1.Text & "" &
Text2.Text & "ddddddddddd"

هذا الجزء في غلط
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
mr.suhib
مؤسس المنتدى
مؤسس المنتدى


لاقيني عالنمبز : الاردني
الجنس : ذكر
عدد المساهمات : 617
التـقـيـيـم : 56
انــا مــن : اردن النشامى
عـمـري: : 24
تاريخ التسجيل : 16/08/2011

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   25/6/2012, 6:43 pm

مجهود وموضوع رائع وينقل لقسم البرمجه
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://الاردني@nimbuzz.com http://www.facebook.com/suhib.jo
السفاح
المشرفين
المشرفين


الجنس : ذكر
عدد المساهمات : 273
التـقـيـيـم : 5
عـمـري: : 25
تاريخ التسجيل : 26/08/2011

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   2/7/2012, 10:21 pm

مشكوور ياغالي فعلا مبدع ياغالي تقبل مروري
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
abdo.jado
المشرفين
المشرفين


لاقيني عالنمبز : abdo_jado@nimbuzz.com

الجنس : ذكر
عدد المساهمات : 854
التـقـيـيـم : 65
انــا مــن : جمهورية جادو العظيمه
عـمـري: : 22
تاريخ التسجيل : 18/05/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   2/7/2012, 11:52 pm

lol! حلو وكان منطولوش عليك هات
الطريقه بالسي++ lol!
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://abdo_jado@nimbuzz.com http://fb.com/abdo.jado
????
زائر



مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   3/7/2012, 10:31 pm

lol! رووووعه يعطيك العااافية
الرجوع الى أعلى الصفحة اذهب الى الأسفل
yazan
مشرف سابق
مشرف سابق


لاقيني عالنمبز : أسسسطورة@nimbuzz.com
الجنس : ذكر
عدد المساهمات : 246
التـقـيـيـم : 60
انــا مــن : ارض الرجال اكيد ليبيا يامان
عـمـري: : 29
تاريخ التسجيل : 02/06/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   5/7/2012, 7:34 pm

libya
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
yazan
مشرف سابق
مشرف سابق


لاقيني عالنمبز : أسسسطورة@nimbuzz.com
الجنس : ذكر
عدد المساهمات : 246
التـقـيـيـم : 60
انــا مــن : ارض الرجال اكيد ليبيا يامان
عـمـري: : 29
تاريخ التسجيل : 02/06/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   5/7/2012, 7:51 pm

(f)
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
????
زائر



مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   6/7/2012, 7:21 am

thanks شكرا لمروركم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
r7ibani
المشرفين
المشرفين


لاقيني عالنمبز : ابوخالد
؛~^ابوخالد^~؛
الجنس : ذكر
عدد المساهمات : 87
التـقـيـيـم : 24
انــا مــن : سوريا
عـمـري: : 19
تاريخ التسجيل : 24/06/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   6/7/2012, 8:30 am

والله ما فهمت شي
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو https://www.facebook.com/allaham97
????
زائر



مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   10/7/2012, 12:44 am

lol! المهم تقرا ههههههههههههه
الرجوع الى أعلى الصفحة اذهب الى الأسفل
abdo.jado
المشرفين
المشرفين


لاقيني عالنمبز : abdo_jado@nimbuzz.com

الجنس : ذكر
عدد المساهمات : 854
التـقـيـيـم : 65
انــا مــن : جمهورية جادو العظيمه
عـمـري: : 22
تاريخ التسجيل : 18/05/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   10/7/2012, 5:44 pm

يناس هدا مش درس علوم ولا تربيه اسلاميه بينقرا lol!
:D
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://abdo_jado@nimbuzz.com http://fb.com/abdo.jado
????
زائر



مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   14/7/2012, 10:22 pm

:S وشن دخل التربية الاسلامية في النص
الرجوع الى أعلى الصفحة اذهب الى الأسفل
sn!p3r l!bya
عضو جديد
عضو جديد


لاقيني عالنمبز : الاحسن ترسل الاضافة من نيمبز ديسك توب ههههخ
(22-18)
الجنس : ذكر
عدد المساهمات : 2
التـقـيـيـم : 3
انــا مــن : ليبيا الحرة
تاريخ التسجيل : 07/12/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   11/12/2012, 3:34 am

ههههههخ خوي ياريت تدير شرح فيديو علي فيجول ستوديو 2010 :S مافهمت علي شرحك هذا
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
فارس_الأحلام
نائب المدير العام
نائب المدير العام


لاقيني عالنمبز : welo~2010@nimbuzz.com


الجنس : ذكر
عدد المساهمات : 1460
التـقـيـيـم : 104
انــا مــن : `لــــــيــــــ♥ـــبـــــــيــــــا`
عـمـري: : 21
تاريخ التسجيل : 08/12/2011

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   11/12/2012, 3:54 am

منقووووووول
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://[welo~2010@nimbuzz.com  [www.welo2010.blogspot.com http://facebook.com/Ala.Alhmami
abdo.jado
المشرفين
المشرفين


لاقيني عالنمبز : abdo_jado@nimbuzz.com

الجنس : ذكر
عدد المساهمات : 854
التـقـيـيـم : 65
انــا مــن : جمهورية جادو العظيمه
عـمـري: : 22
تاريخ التسجيل : 18/05/2012

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   12/12/2012, 1:35 pm

فارس مزال يخدم نفس الكود بعد التحديت الاخير ؟؟؟؟؟؟؟؟؟؟؟؟؟؟
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://abdo_jado@nimbuzz.com http://fb.com/abdo.jado
فارس_الأحلام
نائب المدير العام
نائب المدير العام


لاقيني عالنمبز : welo~2010@nimbuzz.com


الجنس : ذكر
عدد المساهمات : 1460
التـقـيـيـم : 104
انــا مــن : `لــــــيــــــ♥ـــبـــــــيــــــا`
عـمـري: : 21
تاريخ التسجيل : 08/12/2011

مُساهمةموضوع: رد: عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6   13/12/2012, 9:05 pm

I Don't Know Sorry
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://[welo~2010@nimbuzz.com  [www.welo2010.blogspot.com http://facebook.com/Ala.Alhmami
 
عمل اتصال بسيرفر النمبز عن طريق الفيجوال بيزك6
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات نمبز فاميلي العربيه الاردنية JordaN-BuzZ ™ :: قسم البرمجه :: فيجول بيسك دوت نت vb.net-
انتقل الى: