Line 480: End If
Line 481:
Line 482: coord.Text = "<script>const coordenada = [" & Trim(catalegDS.Tables(0).Rows(0).Item("latitut")).Replace(",", ".") & ", " & Trim(catalegDS.Tables(0).Rows(0).Item("longitut")).Replace(",", ".") & "]</script>"
Line 483:
Line 484: Dim textTestimoniFoto As String = ""
|