web service ??? connection?

Question

here is the code of the web service
does anyone knows how to call this service in vb.net

_
Public Function connection() As Integer
Dim conn As New SqlConnection("Server=myserver;Trusted_Connection=True;")
Dim cmd As New SqlCommand("Select count(*) from person", conn)
Dim i As Integer
conn.Open()
i = cmd.ExecuteScalar()
conn.Close()
Return i
End Function


i would like if someone post a code for calling this webservice

Answer 1

Just add a reference to it, then (if local):

Dim oWS As New localhost.WebServiceName()
Messagebox.Show(oWS.connection)

Answer 2

http://quickstarts.asp.net/QuickStartv20/webservices/