|
Takže, snažím se poslat z visualbasicu (2005, express) promnenou metodou GET. kod vypada asi takto:
sub send()
Dim url As String = "http://stranka.cz/kniha.php?zprava=" & message
WebRequest.Create(url).GetResponse().Close()
chat.Refresh()
end sub
pricemz message je zprava, kterou chci odeslat. Kdyz zavolam tuto proceduru, tak se nic nestane. nevim nakonec tady je soubor kniha.php
<? $mess = $_GET['zprava'] ?>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
<LINK href="styl.css" rel="stylesheet" type="text/css">
<title>funChat</title>
</head>
<body>
<?
if (File_Exists ("kniha.html")): //existuje soubor kniha.html
$fp = FOpen ("kniha.html", "r"); //otevře soubor kniha.html pro čtení
$data = FRead ($fp, FileSize("kniha.html")); //přečte data ze souboru a uloží do proměnné "data" - kvůli tomu aby se zobrazoval poslední příspěvek nahoře
FClose($fp); //zavře kniha.html
endif;
$fp = FOpen ("kniha.html", "w"); //otevře book.dat pro přepis nebo vytvoření
FWrite ($fp, $data.$mess); //zápis do souboru book.dat (nejprve aktuální příspěvek, poté předešlý obsah souboru book.dat)
FClose ($fp); //zavře soubor kniha.html
$fp = FOpen ("kniha.html", "r"); //otevře soubor kniha.html pro čteni
FPassThru($fp); //zobrazi ho
?>
</body>
</html>
|