الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طريقة البحث .. مساعده

مغلق
بدأه Wekwek في 22 سبتمبر 2007 · 8 رد · 682 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

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

فكرت في برنامج يخدمني

الفكره بسيطه والمشروع صغير للغايه

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

المشروع هو

واحد فورم Form1

واحد كومند Command1

واحد كمبو بكس Combo1

المساعده التي اريدها هي؟

كيف اخلي الفايل serch المخزن فيه جميع كلمات البحث مربوط مع Combo1

الفايل هو serch مرفق مع البرنامج

بعد الاختيار الكلمه المراد البحث عنها أضغط على زر البحث يدخلني موقع قوقل ومسوي بحث جاهز؟

ومثال للمشروع مرفق

ودمتم سالمين واعاده الله لنا ولكم بالخير

web_google.rar

#2

رفع الموضوع

مافي احد يساعدني؟

#3

بعد ما تعمل بحث فى جوجل هتلاقى انه عنوان الصفحة ( URL ) به كلمة البحث بطريقة ما يمكن اﻷستفادة منها.

بالمناسبة Search مش serch

http://www.google.com/search?q=<Your Search Item>
#4

السلام عليكم

يعطيك العافيه اخوي على الاهتمام في موضوعي

انا ابي الطريقه كيف ربط

نفرض هنا Combo1 انا مختار كلمه البحث [كويت]

وعند الضغط على الزر البحث يبطل المتصفح على موقع قوقل والبحث عن [كويت]

وهذي صوره للبرنامج يمكن انت مانزلت المثال

CCY87087.jpg

وشكراً على اهتمامك

وربي يزيد كل ذو علم علماً

#5
Dim strURL As String
strURL = "http://www.google.com/search?q=" & Combo1.Text
#6

السلام عليكم

يعطيك العافيه اخوي

ادري تعبتك معاى بس صدقني ماني فاهم شي

ممكن تعطيني مثال؟

#7
 

	Public IsBusy As Boolean = False
	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		NavigateToUrlSync("xxxx"& ComboBox1.Text)

	End Sub
	Public Sub NavigateToUrlSync(ByVal url As String)

		IsBusy = True

		AxWebBrowser1.Navigate(url)

		While (IsBusy)

			Application.DoEvents()

		End While

	End Sub

	Private Sub AxWebBrowser1_DocumentComplete(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_DocumentCompleteEvent) Handles AxWebBrowser1.DocumentComplete
		IsBusy = False
	End Sub

حيث ان

xxxx=http://www.google.com/search?q=

الدوت نت اتمنى انه يفيدك

مع العلم انى منزل webbrowser

على الform

وايضا منزل اداتى ال

combobox

وbutton

السلام عليكم

تم تعديل هذه المشاركة بواسطة احمد فوزى النجار في 23 سبتمبر 2007 في 02:19

[وسط][يمين] [وسط]الأسم :أحمد فوزى أحمد حسن النجار

المؤهل الدراسى بكالريوس

حاصل على الشهادات دولية التالية من ميكروسوفت : MCP MCAD MCSD MCTS

اعمل على Vb.net & asp.net & asp

2005 & 2003

وعلى ال Java and vb scripts

الموبايل من خارج مصر: 0020128031164

من داخلها فقط دون كود الدولة:0128031164

الأيميل: ahmed_elnagar32@hotmail.com

الموقع الرسمى: http://www.alzahaby.com

الموقع مغلق مؤقتا للنقل لسرفر افضل

[/يمين][/وسط][/وسط]

#8

السلام عليكم

يعطيكم العافيه اخواني الصراحه تعبتكم معاى

بس للحين ماوصلت حق اللى ابيه

انا ابي احط البرنامج اللى ابي اسوي نفسه شوفوه يمكن توصلكم الفكره واضحه

http://www.inattack.ru/download/google_hacker.rar

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

ويعطيكم العافيه

#9

رفع الموضوع

ارجو الرد

هذا الموضوع مغلق.

مواضيع مشابهة