Dim w, h, wm, wh As Integer
w = CInt(TextBoxW.Text)
h = CInt(TextBoxH.Text)
wm = CInt(TextBoxWm.Text)
hm = CInt(TextBoxHm.Text)
18 sty 2009
Dim w, h, wm, wh As Integer
w = CInt(TextBoxW.Text)
h = CInt(TextBoxH.Text)
wm = CInt(TextBoxWm.Text)
hm = CInt(TextBoxHm.Text)
$email='rezerwacja@kody.wig.pl';
$headers="From: Rezerwacja\rReply-To: $email\r";
mail($to,$subject,$message,$headers);
$name = iconv('ISO-8859-2', 'US-ASCII//TRANSLIT', $name);