<% Option Explicit %> DMOB Biography
USMRA Logo

US Mountain Ranger Association

Promoting fellowship & brotherhood among US Army Rangers

Distinguished Member of the
Airborne & Ranger Training Brigade

<% Dim Connect, dmob, ID Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open = "Provider=Microsoft.Ace.OLEDB.12.0;Data Source=" & Server.MapPath("\database/UnitRoster.mdb") & ";" ID = Trim(Request("ID")) If ID = "" Then Response.Write "No Item Number was sent." Else Set dmob = Connect.Execute("SELECT * FROM dmob WHERE ID=" & ID) %>
<% =dmob("Rank") %> <% =dmob("FirstName") %> <% =dmob("LastName") %>
">
<% =dmob("Bio") %>
<% End If %>
Community Partners