<head>
<script language="VBScript">
sub ustaw()
form1.date1.value = date()
form1.date2.value = dateadd("m",-1,date())
end sub
</script>
</head>
<body>
<form name="form1" method="post">
<input type="button" value="Ustaw date" name="buttonname" onclick="ustaw"/>
data
<input id="date1" type="text" name="datefrom" size="20"/>
data: miesiac -1
<input id="date2" type="text" name="dateto" size="20"/>
</form>
</body>
</html>28 lis 2008