سؤال: اتصال بالانترنت ورفع الملفات من برنامجي

[Romantic_touch 1]

السلام عليكم

الخوة الخبراء في هذا المنتدى بحثت كتيرا عن حل لمشكلتي ولم اجدها وارجو منكم المساعدة اذا تكرمتم

الموضوع:

عندي برنامج يعمل على تحويل بيانات من قاعدة البينات الى ملفات XML وهذه إن شاء الله مقدور عليها مع اني لم اجربها

ثم بعد ذلك يرفع او يحمل الملفات هذه الى سيرفر خاص بالشركة وايضا قد ينزل ملفات من السيرفر عن طريق الاتصال بالانترنت

السؤال هنا

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

proxy and port and connection number

يعني مثلا لمن هم في السعودية نفترض الاتي

proxy.nesma.net.sa 8080 3660033

فرضا فقط ولكن قد يختلف فبعض الشركات لاتحتاج سوى رقم الاتصال (3660033)

ثانيا كيف اقدر ان احمل ملفات من جهازي الى السيرفر ماهي الطريقة

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

[NO BODY CAN BEAT ME 0]

اخي لتنزيل الملف من الانترنت شوف مكتبة الاكواد بتلاقي فيها عن رفع الملفات:)

هذا الكود يقوم بتحميل ملف من النت:

Dim wc As New System.Net.WebClient()

wc.DownloadFile("http://www.microsoft.com/homepage/gif/artHome.gif", "c:x.gif")

End Sub

بطل الكود هو : الدالة DownloadFile والتي توجد في الكلاس WebClient والذي يوجد في فضاء الاسماء Net .

الدالة DownloadFile لها تابعين:

1- الملف الذي تريد تحميله من الشبكة .

2- المسار الذي تريد فيه تحميل الملف .

[hazzoom 158]

جزاك الله خيرا يا أخ NO BODY CAN BEAT ME لكن الأخ Romantic_touch يريد رفع الملفات وليس تنزيلها , ولكن لن تختلف العمليه بالكود كثيرا :

Dim data() As Byte
Dim webc As Net.WebClient
webc.UploadData("my site", data)

حيث أن المصفوفه data تحتوي علي البيانات المطلوب رفعها الي العنوان ..... ,,,

تم تعديل 29 Sep 2005 بواسطه hazzoom

[NO BODY CAN BEAT ME 0]

شكرا اخي هزوم لكنه طالب تنزيل الملفات:) ("وايضا قد ينزل ملفات من السيرفر عن طريق الاتصال بالانترنت") على كل حال الف شكر على كود الرفع

[hazzoom 158]

كلامك صحيح أخي NO BODY CAN BEAT ME ,

ولأخي Romantic_touch

[Romantic_touch 1]

الف شكر ياشباب لتفاعلكم ولكنكم انتم مثل من قسم التركة قبل ان يموت

المفروض اني اعرف اولا كيف اتصل بالانترنت عن طريق برنامجي ثم اعرف كيف ارسل واستقبل :)

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

اذا كان متصل يقوم بالا رسال والاستقبال اذا لا يقوم بطلب اتصال سواء عن طريق الهاتف او غيره

[Romantic_touch 1]

أخواني اعود للسؤال هذا واطرح الموضوع بشكل اوضح

لدي ملف من نوع txt يومجد في جهازي واريد ان ارفعه الى الانترنت الى صفحة معينة بلغة asp ولنفترض انها upload.asp

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

فهل الى طريق ؟

[SOLO.NET 87]

الافضل ان تطرح استفسارك فى قسم ASP.NET

[nada 52 0]

اهلا اخي حاولت افهم سؤالك بس مو كثير

لكن فعلا مثل ماخبروك الزملاء انت لابد تكون ملم بلغة

asp.net

حتى تخزن البيانات في القاعدة

اما الملف كيف ترفعة الى الصفحة ما عرفت مقصدك ؟؟؟؟؟؟؟؟ لو توضح لي او ترسم لي

ممكن اساعدك بعمل هاي الصفحة

[Romantic_touch 1]

اخواني انا اعمل على vb.net وليس asp.net

لدي ملف من نوع txt اريد ان اقوم برفعه الى الانترنت نت من برنامجي وقرأة محتواه من قبل صفحة ويب او web services اي طريقة

للتوضيح:

افترض انك في صفحة انترنت فعليه وتقوم بتحميل ملف .. مالذي سيحدث؟؟

الذي سيحدث هو:

1- سوف تقوم بعمل بتحديد مسار الملف في جهازك ................ ( اقدر اعملها)

2- سوف تضغط على زر ارسال فرضا

3- سوف تذهب المعلومات الى صفحة اخرى وغالبا ماتكون في الproperty التي تدعى action في الform التي في صفحة الويب (هذه معروفة لمن يستخدم html)

4- في الصفحة التي ستذهب اليها سوف تقرأ المحتويات التي أتت من الصفحة السابقة والمحتويات هنا ستكون عبارة عن ملف ثم تقوم بعمل الأوامر التي تحفظ بها هذا الملف

اما انا فلا اريد ان احفظه اريد فقط ان اقرأ محتوياته يعني النص الذي بداخله وسوف اقوم بحفظه في متغير اخر وتخزينه في قاعدة البيانات بنوع blob هذا كل شي!

[Romantic_touch 1]

اعيد صياغة الهدف من سؤالي

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

كيف هذا بأي طريقة كانت.

[ghazi 0]

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

اذا كان متصل يقوم بالا رسال والاستقبال اذا لا يقوم بطلب اتصال سواء عن طريق الهاتف او غيره

أنا ما عندي إلا الرد على هذه الفقرة .. ويا ليت أقدر اساعدك أكثر

هذه هي الدالة الخاصة بفحص الإتصال بالإنترنت هل هو متصل أم لا..

وحقيقة لا أتذكر مصدرها ..

Private Function chLongWeb() As Boolean
        Dim blnIntStat As Boolean
        If Not blnIntStat = InternetGetConnectedState(0&, 0&) Then
            chLongWeb = True
        Else
            chLongWeb = False
            MessageBox.Show("حالة الإتصال بالإنترنت هي =  " & blnIntStat.ToString() & Chr(13) & "فضلاً قم بوصل الإنترنت")
        End If
    End Function

[Romantic_touch 1]

الف شكر للجميع

الأخ غازي هل لديك ايضا الدالة التي تقوم بطلب الاتصال بالانترنت

كأن اعطيها رقم الهاتف واتصل

او في أسؤ الاحوال اقوم باظهار الاتصال التلقائي (اي النافذة التي تظهر عادة عندما اطلب الاتصال بالانترنت) ليقوم المستخدم بالضغط على زر اتصال

[adtd 0]

اخي الغالي كود التحقق ما زبط معي