This is my first VBScript, please help me.

Code:
<HTML>
<BODY>

<script language="VBScript">
call GetVal

Sub GetVal
	open "Contador.shtml" for input as #1
		input #1, valor
		document.form1.t1.value=valor
	close #1
	document.form1.t1.value=document.form1.t1.value+1
end sub
</script>
<form>
<input type="text" size=10>
</form>
</BODY>
</HTML>
numibesi