Automobile Purchase Auto Auction :: AutoCastle FeedBack

tion.ConnectionString = Application("ConnectionString") oConnection.Open Application("ConnectionString") Select Case flag Case 0 sSQL = "SELECT * FROM OpenAuctionsList WHERE userID = " & userID Case 1 sSQL = "SELECT * FROM CompletedAuctionsList WHERE userID = " & userID Case 2 sSQL = "SELECT * FROM ClosedAuctionsList WHERE userID = " & userID End Select Set GetUserAuctions = oConnection.Execute(sSQL) End Function '------------------------------------------------------------------------------------------------------- Function GetUserName(id) Dim oConnection Dim sSQL Set oConnection = Server.CreateObject("ADODB.Connection") oConnection.ConnectionString = Application("ConnectionString") oConnection.Open Application("ConnectionString") sSQL = "SELECT lname + ' ' + fname FROM register WHERE userID = " & id Set rs = oConnection.Execute(sSQL) GetUserName = rs.fields(0).value Set rs = Nothing oConnection.Close End Function %> Automobile Purchase Auto Auction :: AutoCastle FeedBack

Auto Auction. Buy car, sell car online. Established in 2001

Home

About Us

Contact

FAQ

Member Login

Auto auction - buy cheaper, sell faster

BUY

SELL

DEALERS

AUTO LOANS

AUTOCASTLE FEEDBACK


Please use this form to document problems or praise. This message will be forwarded to our Web-Support and management. You will get a quick response.

Regarding :
Web issue experienced :
Location :
Your E-mail :
Your Phone number/ and question... :