تحية طيبة ،،،
اولا : كل عام وانتم بخير
ثانيا : اريد ان استدعي URL والمقصود مثلا : http:www.123.com/UserName مثلا فيرد لي هذا URL اي شي
ولنقل Session
ماهي الطريقة باستخدام لغة VB6 الت استطيع ان انادي من خلالها هذا URL وكيفية اخذ الرد ووضعه في String مثلا
شكرا للجميع
وكل عام وانتم بخير مرة اخرى
يــــا أقصى .... لا تنادي ..... فلن يجيبك احد
أخي الحبيب:
لا أعتقد أني قد فهمت سؤالك بطريقة صحيحة لكن عموما إذا أردت كود يقوم بفتح موقع معين URL فيمكنك إستخدام الكود التالي:
هذا الجزء يتم وضعه في منطقة الإعلان العام الـ General :
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Const SW_SHOWNORMAL = 1
و هذا الجزء يتم وضعه في الحدث الخاص بالزر :
Dim myurl As String myurl = ShellExecute(0&, vbNullString, "http://www.mysite.com", vbNullString, "C:\", SW_SHOWNORMAL)
و لك مني جزيل الشكر,,, (h)
تم تعديل هذه المشاركة بواسطة Alaa Awaad في 6 أكتوبر 2005 في 15:30
____________________________________________________________________________
{ اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ } سورة الأنبياء (1)
____________________________________________________________________________
In a world without walls and fences, who needs Windows and Gates
![29_09_05_02_32_59_1128029579_4_13_3[_].gif](http://www.arabteam2000.com/picload/pics/29_09_05_02_32_59_1128029579_4_13_3%5B_%5D.gif)
صور gif شفافة لتجميل واجة البرنامج
الخط العثماني للمهتمين ببرمجة برامج تلاوة القرآن
كيف يمكن عمل سكرول بالماوس, scroling by mouse wheel
هل نكذب علي الله ام نكذب علي انفسنا
البـر لا يبلي ، و الذنب لا ينسـي ، و الديـان لا يمـوت ، افعـل مـا شئت كما تـديـن تـدان
ليس كل من تعمم مفتيا ، بل ان الدين الاسلامي ليس قيه كهانه و بالتالي ليس فيه ما يعرف ب رجال الدين – احمد رجب
مع خالص تحيـــــــــــــــــــــــــــــــــاتي
GAF58
أشكركم على الحلول المطروحة ولكن اليكم بالضبط ما أريد بحيث يكون على هذا الشكل:
WebRequest rqt = request("www.yahoo.com")
WebResponse rsp = response(rqt)
string s = rsp.ToString()
هذا ما أريده باستخدام VB6
يــــا أقصى .... لا تنادي ..... فلن يجيبك احد
عذرا ان كنت خرجت عن الموضوع
اقتباسيــــا أقصى .... لا تنادي ..... فلن يجيبك احد!!
الخير في و في امتي الي يوم الدين
صدق رسول الله صلي الله عليه وسلم
***************************************
لا تقنطوا من رحمة الله
صدق الله العظيم
صور gif شفافة لتجميل واجة البرنامج
الخط العثماني للمهتمين ببرمجة برامج تلاوة القرآن
كيف يمكن عمل سكرول بالماوس, scroling by mouse wheel
هل نكذب علي الله ام نكذب علي انفسنا
البـر لا يبلي ، و الذنب لا ينسـي ، و الديـان لا يمـوت ، افعـل مـا شئت كما تـديـن تـدان
ليس كل من تعمم مفتيا ، بل ان الدين الاسلامي ليس قيه كهانه و بالتالي ليس فيه ما يعرف ب رجال الدين – احمد رجب
مع خالص تحيـــــــــــــــــــــــــــــــــاتي
GAF58
مشكور
هذا الموضوع مغلق.