webForumDet fria alternativet
Logga in / Bli medlem

Frågeformulär och frågor så att det står härliga till

ASP

14 svar · 377 visningar · startad av medialabs

medialabsMedlem sedan mars 20023 686 inlägg
Frågan#1

Ingen av er som råkar ha ett aspscript som fungerar som ett frågeformulär? skulle vilja ställa tex 5 st frågor till besökarna och sedan så ska dom få ett antal val till varje fråga, vill sedan kunna se hur dom har svarat på varje fråga.. har inte hittat något och är inte SÅ duktig att jag klarar av att skriva en sådan själv.

SebbeMedlem sedan jan. 20032 285 inlägg
#2

Är det ungefär såhär du menar?

<html>
  <body>
    <form action="#" method="post">
      1.<br>
      <input type="radio" name="ett" value="1">
      <input type="radio" name="ett" value="2">
      <input type="radio" name="ett" value="3"><p>
      2.<br>
      <input type="radio" name="tva" value="1">
      <input type="radio" name="tva" value="2">
      <input type="radio" name="tva" value="3"><p>
      3.<br>
      <input type="radio" name="tre" value="1">
      <input type="radio" name="tre" value="2">
      <input type="radio" name="tre" value="3"><p>
      <input type="submit" value="Svara!" name="svara">
    </form>
<%
If Request.Form("svara") <> "" Then
  For Each Value In Request.Form
    If NOT Value = "svara" Then
      i = i + 1
      Response.Write("På fråga " & i & " svarade du " & Request.Form(Value) & ".<br>")
    End If
  Next
End If
%>
  </body>
</html>
medialabsMedlem sedan mars 20023 686 inlägg
#3

Sebbe skrev:

Är det ungefär såhär du menar?

<html>
  <body>
    <form action="#" method="post">
      1.<br>
      <input type="radio" name="ett" value="1">
      <input type="radio" name="ett" value="2">
      <input type="radio" name="ett" value="3"><p>
      2.<br>
      <input type="radio" name="tva" value="1">
      <input type="radio" name="tva" value="2">
      <input type="radio" name="tva" value="3"><p>
      3.<br>
      <input type="radio" name="tre" value="1">
      <input type="radio" name="tre" value="2">
      <input type="radio" name="tre" value="3"><p>
      <input type="submit" value="Svara!" name="svara">
    </form>
<%
If Request.Form("svara") <> "" Then
  For Each Value In Request.Form
    If NOT Value = "svara" Then
      i = i + 1
      Response.Write("På fråga " & i & " svarade du " & Request.Form(Value) & ".<br>")
    End If
  Next
End If
%>
  </body>
</html>

Nja, nästan, ska försöka förklara lite bättre, vill göra det som en undersökning nästan, dom får ett antal frågor och alternativ som du har gjort här, och sedan så skulle jag vilj lagra dessa i en databas.

För att sedan på en annan sida få fram vad vad tycker om varje fråga. ungefär som:

» Är du man eller kvinna?
- Man | 60%
-Kvinna | 40%

» Är webbsidan lättnavigerad?
- Ja | 80%
- Nej | 20%

osv...

joel_joel88s avatarjoel_joel88Medlem sedan nov. 20021 222 inlägg
#4

menar du ett Poll system som det brukar kallas? altså så det visas i procent vad som har svarats på frågan

SebbeMedlem sedan jan. 20032 285 inlägg
#5

Ja, men det blir väl inte mycket skillnad egentligen? :)

<html>
  <body>
    <form action="#" method="post">
      Är du man eller kvinna?<br>
      Man <input type="radio" name="kon" value="man">
      Kvinna <input type="radio" name="kon" value="kvinna"><p>
      Är sidan lättnavigerad?<br>
      Ja <input type="radio" name="nav" value="ja">
      Nej <input type="radio" name="nav" value="nej"><p>
      O.s.v...<br>
      <input type="radio" name="osv" value="fattar">
      <input type="radio" name="osv" value="fattarinte"><p>
      <input type="submit" value="Svara!" name="svara">
    </form>
<%
If Request.Form("svara") <> "" Then
  Set objConn = Server.CreateObject("ADODB.Connection")
  objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db.mdb")

  If Request.Form("kon") = "man" Then
    strKon = "Man"
  Else
    strKon = "Kvinna"
  End If

  If Request.Form("nav") = "ja" Then
    blnNav = True
  Else
    blnNav = False
  End If

  strSQL = "INSERT INTO tabell (kon, nav) VALUES ('" & strKon & "', " & blnNav & ")"
  objConn.Execute(strSQL)
  objConn.Close : Set objConn = Nothing

  Response.Redirect("lista.asp")
End If
%>
  </body>
</html>

Sedan listar du bara ut värderna på den andra sidan. :)

medialabsMedlem sedan mars 20023 686 inlägg
#6

Sebbe skrev:

Ja, men det blir väl inte mycket skillnad egentligen? :)

<html>
  <body>
    <form action="#" method="post">
      Är du man eller kvinna?<br>
      Man <input type="radio" name="kon" value="man">
      Kvinna <input type="radio" name="kon" value="kvinna"><p>
      Är sidan lättnavigerad?<br>
      Ja <input type="radio" name="nav" value="ja">
      Nej <input type="radio" name="nav" value="nej"><p>
      O.s.v...<br>
      <input type="radio" name="osv" value="fattar">
      <input type="radio" name="osv" value="fattarinte"><p>
      <input type="submit" value="Svara!" name="svara">
    </form>
<%
If Request.Form("svara") <> "" Then
  Set objConn = Server.CreateObject("ADODB.Connection")
  objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db.mdb")

  If Request.Form("kon") = "man" Then
    strKon = "Man"
  Else
    strKon = "Kvinna"
  End If

  If Request.Form("nav") = "ja" Then
    blnNav = True
  Else
    blnNav = False
  End If

  strSQL = "INSERT INTO tabell (kon, nav) VALUES ('" & strKon & "', " & blnNav & ")"
  objConn.Execute(strSQL)
  objConn.Close : Set objConn = Nothing

  Response.Redirect("lista.asp")
End If
%>
  </body>
</html>

Sedan listar du bara ut värderna på den andra sidan. :)

Så, men problemet är bara att jag inte har Access. Har inte officepaketet så jag kan inte tillverka några databaser ;)

SebbeMedlem sedan jan. 20032 285 inlägg
#7

Det har inte jag heller, så då gör man ett script för att hantera databaserna! ;)

medialabsMedlem sedan mars 20023 686 inlägg
#8

Sebbe skrev:

Det har inte jag heller, så då gör man ett script för att hantera databaserna! ;)

Smart ;)

SebbeMedlem sedan jan. 20032 285 inlägg
#9

medialabs skrev:

Sebbe skrev:

Det har inte jag heller, så då gör man ett script för att hantera databaserna! ;)

Smart ;)

Japp. ;)
Är det MySQL du har annars eller? :)

medialabsMedlem sedan mars 20023 686 inlägg
#10

Sebbe skrev:

medialabs skrev:

Sebbe skrev:

Det har inte jag heller, så då gör man ett script för att hantera databaserna! ;)

Smart ;)

Japp. ;)
Är det MySQL du har annars eller? :)

Nepp,, kör med Access, men det var så länge sedan jag behövde göra databaser till webbplatsen,

SebbeMedlem sedan jan. 20032 285 inlägg
#11

Aha! :i
Sent påtänkt? ;) Hur ska vi då lösa det? Ska jag fixa en databas kanske? :)

medialabsMedlem sedan mars 20023 686 inlägg
#12

Sebbe skrev:

Aha! :i
Sent påtänkt? ;) Hur ska vi då lösa det? Ska jag fixa en databas kanske? :)

Det var ganska sent påtänkt av mig igentligen :r , om jag har tur så finns access installerat i datorn i skolan

medialabsMedlem sedan mars 20023 686 inlägg
#13

har en liten följdfråga:

Om jag har flera alternativ än 2, hur ska IF-satsen då bli?

medialabsMedlem sedan mars 20023 686 inlägg
#14

Nepp,det är ju ta mig fan helt jävla omöjligt att försöka spara ner nått i tabellen, Skulle verkligen uppskatta en databas med tillhörande kod för att sätta in resultatet i en databas.

Ta er en titt på https://www.medialabs.se/a.asp

@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#15

Eftersom du inte beskriver vad det är för fel så kan jag inte säga annat än att sidan du försöker posta till (spara.asp) inte finns.

252 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
125 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)