% 'Connection to Database Dim con Dim rstView set con = server.CreateObject("ADODB.Connection") con.Open "DBQ=" & Server.Mappath("../../db/Hermansville.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" & ";PWD=hville;" Set rstView = con.Execute("SELECT * FROM BusSites WHERE BusName = 'Hairdoo9111'") Info = rstView.Fields("Info") %>
![]() |
![]() |
![]() |
|
|
Hair care services for the entire family.
<%=Info%>
|
![]() |
|
![]() |
|||
|
|
|||
|
Call for appointment: Patti
Whitens N16344
Lane |