%@ 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
This material may not be published, broadcast, rewritten or redistributed without the written permission of the copyright holder.
Interested in a career at Journal Register Company, click here
© Copyright Go And Do Michigan, a Journal Register Property & part of Journal Register MI -- All rights reserved
Our Publications | About Our Ads | Privacy Policy/Terms of Service