<%
dim Specialv, Special2, path, tagx, weeks
Specialv = "MRRPC"
Special2 = "Mississippi Rirver Regional Planning Commision"
path = "https://www.wisconsinsystem.com/newsletters/hnotes/"
tagx = "#MRRPCnews"
weeks = 4
Dim oConn, oRs
Dim qry, connectstr
Dim db_name, db_username, db_userpassword
Dim db_server, rs
db_server = "a2nlmysql37plsk.secureserver.net"
db_name = "wisconsinsystem"
db_username = "HarwoodKen"
db_userpassword = "Kenkat2008!"
fieldname = "title"
tablename = "hnotes"
connectstr = "Driver={MySQL ODBC 3.51 Driver};SERVER=" & db_server & ";DATABASE=" & db_name & ";UID=" & db_username & ";PWD=" & db_userpassword
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open connectstr
%>
Start Week: 17
Query String: SELECT * FROM WHERE `issue` > 17 AND volume = 25 OR `issue` > 90 ORDER BY sortorder
