Avaleht
uus teema   vasta Tarkvara »  WWW »  Küsitlus veebilehele märgi kõik teemad loetuks
märgi mitteloetuks
vaata eelmist teemat :: vaata järgmist teemat
Hinnavaatlus :: Foorum :: Uudised :: Ärifoorumid :: HV F1 ennustusvõistlus :: Pangalink :: Telekavad :: HV toote otsing
autor
sõnum Saada viide sõbrale. Teata moderaatorile
otsing:  
mihkukene
HV kasutaja

liitunud: 24.12.2007
sõnum 24.01.2008 13:13:15 Küsitlus veebilehele vasta tsitaadiga
kas keegi saaks öelda koodi kuidas ma saan küsitluse veebilehele milles peaks olema 1 küsimus ja 3 vastus ja siis see button et " vasta " ja kui paned vasta tleb küsitluse statistika !!
tagasi üles
vaata kasutaja infot saada privaatsõnum
andrusny
Kreisi kasutaja
andrusny

liitunud: 20.03.2006
sõnum 24.01.2008 20:14:07 vasta tsitaadiga
Faili nimi ise.php vaja teha enne käivitamist haal.txt fail mille sisse kirjutada 0:0:0 ja anda sellele 777 õigused.
<body>
Kas sa oled Rakveres olnud?
<form action="ise.php" method="post">
   <input type="checkbox" name="vastus" value="1"> Jah<br>
   <input type="checkbox" name="vastus" value="2"> Ei<br>
   <input type="checkbox" name="vastus" value="3"> Vahest käin<br>
<input type="submit" value="Hääleta">
</form>
<?php
$fp=fopen("haal.txt","r");               
$si=fgets($fp);
fclose($fp);
$mas = explode(":", $si);
echo 'Jah...'.$mas[0].'  häält<br>Ei....'.$mas[1].'  häält<br>Vahest  '.$mas[2].'  häält<br>';
if($HTTP_POST_VARS[vastus]){
$vastus = $HTTP_POST_VARS[vastus];
$mas[$vastus-1] = $mas[$vastus-1]+1;
$salv = implode(":", $mas);
$fp=fopen("haal.txt","w+");               
if (flock($fp, LOCK_EX)) {
   fputs($fp, $salv);
   flock($fp, LOCK_UN);
} else {
   echo "Couldn't lock the file !";
}
fclose($fp);
$query="ise.php";
echo '<META HTTP-EQUIV="REFRESH" CONTENT="0; URL='.$query.'">';}
?>

</body>

_________________
Kommentaarid: 7 loe/lisa Kasutajad arvavad:  :: 0 :: 0 :: 7
tagasi üles
vaata kasutaja infot saada privaatsõnum mine selle kasutaja kodulehele
lehm2
Kreisi kasutaja


liitunud: 19.09.2004
sõnum 24.01.2008 23:06:27 vasta tsitaadiga
andrusny, hea kood, kuid kui võimalik siis kasuta tekst faili asmel andmebaasi.
_________________
Piilu siia, progreja!
Vajad abi Node.JS-ga ?
Võta ühendust !
Kommentaarid: 15 loe/lisa Kasutajad arvavad:  :: 0 :: 0 :: 13
tagasi üles
vaata kasutaja infot saada privaatsõnum mine selle kasutaja kodulehele
andrusny
Kreisi kasutaja
andrusny

liitunud: 20.03.2006
sõnum 25.01.2008 00:09:59 vasta tsitaadiga
Usun, et teema algataja ei suuda seda kasutada. Vähemalt eeldan tema kirjaviisist. Muidu jah oleks andmebaas parem.
************************
Tegin siis prooviks ka andmebaasiga selle. Ei oska ainult seda install nuppu peita, kui tabel juba tehtud.
<body>
Kas sa oled Rakveres olnud?
<form action="ise2.php" method="post">
   <input type="checkbox" name="vastus" value="1"> Jah<br>
   <input type="checkbox" name="vastus" value="2"> Ei<br>
   <input type="checkbox" name="vastus" value="3"> Vahest käin<br>
<input type="submit" value="Hääleta">
</form>

<?php
echo '<form action="ise2.php?id=2" method="post">
<input type="submit" value="Install" >
</form>';
$id = $HTTP_GET_VARS[id];
if($id==2){instal();}
avabaas();
$paring="SELECT * FROM ise2 WHERE id=1";
   paring($paring);
   while ($tulem2=mysql_fetch_assoc($tulemus)){ $si = $tulem2["kys"];}
   mysql_close();
   
//**********************************************

$mas = explode(":", $si);
echo 'Jah...'.$mas[0].'  häält<br>Ei....'.$mas[1].'  häält<br>Vahest  '.$mas[2].'  häält<br>';
if($HTTP_POST_VARS[vastus]){
$vastus = $HTTP_POST_VARS[vastus];
$mas[$vastus-1] = $mas[$vastus-1]+1;
$salv = implode(":", $mas);
avabaas();
   $paring="UPDATE ise2 SET kys = '".$salv."' WHERE id=1";
      paring($paring);
mysql_close();
$query="ise2.php";
echo '<META HTTP-EQUIV="REFRESH" CONTENT="0; URL='.$query.'">';}
//***********************
function instal() {
avabaas();
echo ("<b>Loome tabeli ...</b><br>");
$paring="CREATE TABLE ise2 (
id int(11) NOT NULL auto_increment,
kys text NOT NULL,
PRIMARY KEY (id)
) TYPE=MyISAM;";
paring($paring);
$kys = "0:0:0";
$paring="INSERT INTO ise2 ( id , kys) VALUES ( NULL , '".$kys."')" ;
paring($paring);
}
//***********************
   function avabaas()
{
include 'db.php';
$link = mysql_connect($server, $kasutaja1, $par1)
or die('Ühenduse loomine ebaõnnestus : ' . mysql_error());
mysql_select_db($baas)
or die('Andmebaasi määramine ebaõnnestus : ' . mysql_error());
};
//****************************
function paring($paring)
{
global $tulemus;
$a=$paring;
$tulemus=mysql_query($a) or die( mysql_error());
};
//*****************************
?>

</body>


see siis db.php
<?php

// These are the DBMS credentials
$server = "localhost";
$kasutaja1 = "root";
$par1 = "";
$baas = "test";

?>

_________________
Kommentaarid: 7 loe/lisa Kasutajad arvavad:  :: 0 :: 0 :: 7
tagasi üles
vaata kasutaja infot saada privaatsõnum mine selle kasutaja kodulehele
näita postitusi alates eelmisest:   
uus teema   vasta Tarkvara »  WWW »  Küsitlus veebilehele
[vaata eelmist teemat] [vaata järgmist teemat]
 lisa lemmikuks
näita foorumit:  
 ignoreeri teemat 
sa ei või postitada uusi teemasid siia foorumisse
sa ei või vastata selle foorumi teemadele
sa ei või muuta oma postitusi selles foorumis
sa ei või kustutada oma postitusi selles foorumis
sa ei või vastata küsitlustele selles foorumis
sa ei saa lisada manuseid selles foorumis
sa võid manuseid alla laadida selles foorumis



Hinnavaatlus ei vastuta foorumis tehtud postituste eest.