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