05. juli 2003 - 18:32Der er
13 kommentarer og 1 løsning
Bedømmelses Script !
Nogen der ved hvor man kan finde et bedømmelses script på internettet... Det skal være sådan et script hvor man kan bedømme en ting fra 0 til 5 stjerner...
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Det kræver tabel som hedder stemmeTbl med disse kolonner:
id : autonummer givetTil : tal ID på den vare som stemmes på stemmer : tal antal stemmer totalStjerner total antal stjerner.
<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then stempaa = Request.Form("stempaa") karakter = Request.Form("karakter") strSQL = "SELECT id FROM stemmeTbl WHERE givetTil = " & stempaa set rs = Conn.Execute (strSQL) 'Tjek om der er stem på filmen før eller det er føtste gang. if rs.EOF then strSQL = "INSERT INTO stemmeTbl (stemmer, totalStjerner, givetTil) VALUES (1, " & karakter & ", " & stempaa & ")" else strSQL = "UPDATE stemmeTbl SET stemmer = stemmer + 1, totalStjerner = totalStjerner + " & karakter & " WHERE givetTil = " & stempaa end if Conn.Execute (strSQL) end if %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.