<% ' //////////////////////////////////////////////////////////////////////////////////////// ' //////////////////////////////////////////////////////////////////////////////////////// '---------------------------------------------------------------------------------------- ' Site Constants '---------------------------------------------------------------------------------------- SiteUseFrames = TRUE ' // Valid are [ FALSE | TRUE ] AdminUserName = "admin" ' // These passwords are for logging in to the system. AdminPassword = "admin" ' // Don't forget to change them '---------------------------------------------------------------------------------------- ' Function GetConnStr '---------------------------------------------------------------------------------------- Function GetConStr(dbPath) p = dbPath & "Database\9T48aI26.mdb" GetConStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(p) End Function %>