%@ LANGUAGE="VBSCRIPT" %> <% band = Request.QueryString("ID") Set Conn = Server.CreateObject("ADODB.Connection") ' constr = "DBQ=d:\dbase\heritage\bands.mdb;DefaultDir=d:\dbase\heritage;Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;" constr = "DBQ=d:\dbase\heritage\bands.mdb;DefaultDir=d:\dbase\heritage;Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;UID=admin;" conn.connectionstring = constr session("constr") = constr Conn.Open set rs = server.createobject("adodb.recordset") SQLa = "Select * from bands where ID like " & band & " Order By name" Set RS = Conn.Execute(SQLa) %>
|
|
|
|
|
|
GOhome EVENTScalendar GOhear GOview GOread GOplaces DOmore SOUNDcheck |
|
|
|
|
|
GO & DO Michigan, an Entertainment Portal
http://www.goanddomichigan.com
Interested in a career at Journal Register Company, click here
© Copyright 2009 Heritage Newspapers, an
affiliate of Journal Register Company
All rights reserved. This material may not be published, broadcast,
rewritten or redistributed without the written permission of the copyright holder.