Line 65: Function loadData() As Integer
Line 66: Dim dtResults As DataTable = Nexus.loadTable("select Business_Name, Latitude, Longitude, email, phone, address, State, Post_code, town, abn from companies where id='" & Nexus.sqlValid(Request.QueryString("id")) & "' Limit 1;")
Line 67: Dim drRow As DataRow = dtResults.Rows(0)
Line 68:
Line 69: strLatLng = drRow.Item("Longitude") & ", " & drRow.Item("Latitude")
|