Line 57: Function loadData() As Integer
Line 58: Dim dtResults As DataTable = Nexus.loadTable("select Business_Name, Latitude, Longitude, email, phone, address, State, Post_code, town from companies where id='" & Request.QueryString("id") & "' Limit 1;")
Line 59: Dim drRow As DataRow = dtResults.Rows(0)
Line 60:
Line 61: strLatLng = drRow.Item("Longitude") & ", " & drRow.Item("Latitude")
|