Click here to find out how you can donate to the MUSC Charity Ball Auction Item Donations	Art Children's Items Entertainment For the Home Getaways Gift Certificates Jewelry Live Auctions Memorabilia Money Restaurants Services Sports Other Items
	<%@ Language=VBScript %> <% Dim db Dim strsql Dim rs set db = server.createobject("ADODB.Connection") set rs = server.createobject("ADODB.REcordset") db_server = "whsql-v11.prod.mesa1.secureserver.net" db_name = "DB_105043" db_username = "charityball" db_userpassword = "Charleston1" connectstr = "Driver={SQL Server};SERVER=" & db_server & ";DATABASE=" & db_name & ";UID=" & db_username & ";PWD=" & db_userpassword db.Open connectstr strsql = "SELECT * FROM Auction_Item where Item_Cat='Art'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Art Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Children'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Children's Items Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Entertainment'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Entertainment Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Getaways'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Getaways Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Gift Certificates'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Gift Certificates Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='For The Home'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " For The Home Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Jewelry and Gifts'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Jewelry Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Restaurants'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Restaurants Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Services'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Services Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat='Sports'" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Sports Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " strsql = "SELECT * FROM Auction_Item where Item_Cat=''" rs.open strsql, db response.write "" & vbcrlf response.write "" while not rs.eof response.write "" & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write "" & vbcrlf rs.movenext wend rs.close response.write " Other Items Company                                                                             Item Title     " & rs(1) & "    " & rs(2) & "    " db.close %>