بدست آوردن تاریخ از طریق اینترنت

[Morteza Manafpour]

با سلام
من میخوام برنامه ام وقتی اجرا میشه بررسی کنه که به اینترنت وصل هستش یا نه در صورتی که وصل بود تاریخ دقیق رو از اینترنت دریافت کنه
با تشکر از دوستان

[systam]

سلام
این کد تشخیص اتصال به اینترنت
' rah 1:
if my.computer.network.isavalable then
Msgbox ("connect")
Else
Msgbox ("NO connect")
End if

' rah 2

Const NETWORK_ALIVE_AOL = &H4
Const NETWORK_ALIVE_LAN = &H1
Const NETWORK_ALIVE_WAN = &H2
Private Declare Function IsNetworkAlive Lib "SENSAPI.DLL" (ByRef lpdwFlags As Long) As Long

Private Sub Timer1_Timer()
Dim CRes As Long
If IsNetworkAlive(CResult) = 0 Then
Text1.Text = False
Else
Text1.Text = True
End If
End Sub

[systam]

سلام
برای دریافت تاریخ روز ابتدا یک WebBrowser1 توی برنامه بزار url رو برابر با http://www.time.ir ست کن
و در یک button بنویس
Dim t1 As HtmlElement = WebBrowser1.Document.GetElementById("ctl00_cphMiddleRight_Sampa_Web_View_TimeUI_ShowDat e20cphMiddleRight_3409_lblShamsiDate")
MsgBox(t1.InnerText.ToString)
البته باید به نت متصل باشی ها

موفق باشی
یا علی

[gilsoft]

سلام
برای دریافت تاریخ روز ابتدا یک WebBrowser1 توی برنامه بزار url رو برابر با http://www.time.ir ست کن
و در یک button بنویس
Dim t1 As HtmlElement = WebBrowser1.Document.GetElementById("ctl00_cphMiddleRight_Sampa_Web_View_TimeUI_ShowDat e20cphMiddleRight_3409_lblShamsiDate")
MsgBox(t1.InnerText.ToString)
البته باید به نت متصل باشی ها

موفق باشی
یا علی


سلام دوست عزیز

برای بدست آوردن ساعت .. باید از چه کدی استفاده کرد ؟

[systam]

سلام دوست عزیز

برای بدست آوردن ساعت .. باید از چه کدی استفاده کرد ؟
سلام
هر کنترولیتوی صفحه وب یک ایدی برو توی سورس صفحه وب مورد نظر ایدی کنترول پیدا کن و در
Dim t1 As HtmlElement = WebBrowser1.Document.GetElementById("ctl00_cphMidd leRight_Sampa_Web_View_TimeUI_ShowDate20cphMiddleR ight_3409_lblShamsiDate")
MsgBox(t1.InnerText.ToString)
داخل پرانتز بنویس


موفق باشی
یا علی

[nemokh]

با سلام
آیا به غیر از
WebBrowser
راه دیگه ای برای بدست آوردن اطلاعات از وب هست ؟
مثلا اگه بخاییم 100 عدد از 100 صفحه جداگانه رو یک جا تو نرم افزار نمایش بدیم استفاده از 100
WebBrowser کمی منطقی به نظر نمیرسه
اگه راه دیگه ای هست ممنون میشم بگین

[systam]

با سلام
آیا به غیر ازWebBrowser
راه دیگه ای برای بدست آوردن اطلاعات از وب هست ؟
مثلا اگه بخاییم 100 عدد از 100 صفحه جداگانه رو یک جا تو نرم افزار نمایش بدیم استفاده از 100WebBrowser کمی منطقی به نظر نمیرسه


اگه راه دیگه ای هست ممنون میشم بگین
چه سایتی ادرسشو بده

[nemokh]

مثلا اطلاعات قیمتی (مثل قیمت پایانی )ده شرکت بورسی از سایت
http://www.tsetmc.com/Loader.aspx?ParTree=15
البته در این صفحه هر لحظه اطلاعات عوض میشه
و هر شرکتی صفحه مخصوص خود را دارد
ضمنا این آدرس در وب بروزر بالا نمیاد

[nemokh]

مگر اینکه از این صفحه استفاده کنیم
http://www.tsetmc.com/Loader.aspx?ParTree=15131F
این صفحه هم id یک قسمت مشخص نیست
مثلا قیمت پایانی شرکت مپنا با این کد html نشون داده شده
<div style="width:50px" class="t0c">7,277</div>
موردی که من میخام همون عدد 7277 هست
با تشکر و ممنون

[pbm_soy]

بد نیست مطالب لینک زیر را هم مطالعه کنید

http://www.kloth.net/software/timesrv1.php

[nemokh]

بد نیست مطالب لینک زیر را هم مطالعه کنید

http://www.kloth.net/software/timesrv1.php

جواب مشکلمو نتونستم پیدا کنم