Home page חזרה לדף הבית
Web Service Sample
דוגמא לשימוש ב
------------------------------------------------
instruction:
1. Add Web Reference:
http://www.sky-view.co.il/service.asmx
2. Add The Code (VB.NET Project):
Public Class frmTest
Dim MyService As New SkyView.Service
Private Sub MonthCalendar1_DateChanged(ByVal sender As System.Object, ByVal
e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateChanged
lblParasha.Text = MyService.Parasha(MonthCalendar1.SelectionRange.Start,
CheckBox1.Checked)
LblHebdate.Text = MyService.HebDate(MonthCalendar1.SelectionRange.Start)
End Sub Private Sub
CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles CheckBox1.CheckedChanged
lblParasha.Text = MyService.Parasha(MonthCalendar1.SelectionRange.Start,
CheckBox1.Checked)
LblHebdate.Text = MyService.HebDate(MonthCalendar1.SelectionRange.Start)
End Sub
End Class