%@ Language=VBScript %> <% '------------------------------------------ bookid = 1000 Connect_String="DSN=dotcom" Set MyConn=Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") MyConn.Open Connect_String strParams = chr(39)&bookid&chr(39) rs.Open "sp_get_tbCJLoveItHateIt" & strParams,MyConn, 3, 1, &H0001 '------------------------------------------ if rs.EOF then avg = 0 totvotes = 0 totrating = 0 else totvotes = rs("votes") totrating = rs("rating") avg = totrating/totvotes if avg > int(avg) then avg = int(avg) + 1 end if 'Response.Write avg set rs = nothing resultsimage = "lorh_good_1.gif" if avg = 1 then resultsimage = "lorh_justok_1.gif" if avg = 2 then resultsimage = "lorh_good_1.gif" if avg = 3 then resultsimage = "lorh_fabulous_1.gif" '--------------------------------------------------------- %>
![]() |
![]() |
|
![]() ![]() ![]() ![]() ![]() ![]() ![]() |
||
![]() ![]() |
||
|
Jim Benton is the creator of many licensed properties, some
for big kids, some for little kids, and some for grown-ups that, frankly, are
probably just behaving like little kids. He's created a kids' TV series, designed
clothing, and written books. Jim Benton lives in Michigan with his spectacular
wife and kids.
|
||
|
|
||
| Recent Picks | CJ Recommends | CJ's Past Picks | CJ's Journal | Quiz Me | CJ Sweeps | How To Start a Book Club | |