<% Sub CountDown() 'NOTE: date is in dd/mm/yyyy format' dateNow = FormatDateTime(now(),0) 'response.write "Date is " & dateNow & "
" intSecs = DateDIff("s", dateNow,"5/19/2024 09:00:00 PM") 'end time intSecsStart = DateDiff("s", dateNow,"5/06/2024 12:01:00 PM") 'response.write "date difference " & intsecsstart & "/" & intsecs & "
" if intSecsStart > 0 then response.write "

Preview Only

" blnPreview = 1 else if intsecs > 0 then intDays = int(intSecs/86400) intSecs = intSecs - intDays * 86400 if intDays <> 1 then strDs = "s" intHour = Int(intSecs/3600) intSecs = intSecs - intHour * 3600 if intHour <> 1 then strHs = "s" intMin = Int(intSecs/60) intSecs = intSecs - intMin * 60 if intMin <> 1 then strMs = "s" response.write "

" response.write "Time left: " & intDays & " day" & strDs & ", " & intHour & " hour" & strHs & ", " response.write intMin & " minute" & strMs & ", " & intSecs & " seconds

" else response.write "

Time's Up! - Thank you!

" end if end if End Sub %>

SOS-SRF SPRING 2024 AUCTION

<% Call Countdown %>

Due to problems with the auction, it has been extended until next Sunday, May 19 at 9 PM.

Welcome to the SOS-SRF auction site. The spring auction will run from noon (Eastern Time) on Monday, May 6 until 9:00 PM on Sunday, May 19.

The money raised through our auctions is used to help Siberian Husky Rescue groups with extraordinary medical expenses. Please visit the rescues tab to read the stories of the dogs we've helped.

We accept payment by cash, cheque or through PayPal so international bidders are welcome. Payment information is given with each auction item. Shipping is donated within the United States on some items; other items may require payment of shipping. We will try to consolidate multiple items being shipped outside the U.S.

The auction is run using our own homegrown auction application and you must register to bid. You can register by clicking on the link on the left. If you would like to make a donation to the auction or have any questions, please contact auction@sos-srf.org.

Note to Comcast clients - Comcast frequently blocks messages from the auction server during the auction so you may not receive outbid notices. You can try adding auction@sos-srf.org to your safe senders' list.

Auction items will be available for preview sometime during the week before the auction (possibly before then). Details including numbering may change before the auction goes live. No bidding until the 6th!

** These items have a reserve that has not been met.

<% ' response.write "Session variables " & session("Token") & ", " & session("userID") & ", " & session("username") & "
" intItemTotal=123 randomize intRand = Int(intItemTotal* Rnd) + 1 intRand2 = Int(intItemTotal* Rnd) + 1 intRand3 = Int(intItemTotal* Rnd) + 1 Set objCmd = Server.CreateObject("ADODB.Command") objCmd.CommandType = adCmdStoredProc objCmd.CommandText = "usp_ShowHighBids" objCmd.ActiveConnection = stConn set rs = objCmd.Execute do until rs.eof ItemID = rs("ItemID") if ItemID = intRand then strImage = rs("imageURL") if ItemID = intRand2 then strImage2 = rs("imageURL") if ItemID = intRand3 then strImage3 = rs("imageURL") response.write "" response.write"" response.write "" response.write "" curmaxbid = rs("maxbid") if curmaxbid <> "" then curmaxbid = formatCurrency(curmaxbid) if curmaxbid = 999 then curmaxbid = "--" response.write "" rs.movenext loop Set objCmd = Nothing %>
Item Brief Description High Bidder Bid
" & ItemID & "  " & rs("ItemTitle") & " " & rs("UserName") & " " & curmaxbid & "

ADDED CHAROITE ON WEDNESDAY - HAVE FUN!