Object Variable or With Block variable not Set Hatası

[shuckry]

Merhaba
Başlıkta gördüğünüz hatayı alıyorum
Kod şöyle
<%
Dim deger=al() // Bu satırda Object Variable or With Block variable not Set Hatası var
%>

Sayfanın üst kısmındaki foksiyon şöyle:
Function al() as String
al=me.Items.Item("kisi_sayisi").text //Bu yazım hatalı herhalde...:?
end function

Yapmak istediğim şu: Sayfamda bi tane
<input type="text" name="kisi_sayisi" value="<%=sayi%>">
Bu textin içindeki o anki değeri deger=al() ile almak istiyorum.
Özellikle vb.net te fonksiyonların ve prosedürlerin içindeki yazımlar kafamı çok karıştırıyor.Javascriptteki document.form.isim.value gibi bişi lazım ...

Yardımlarınızı esirgemeyin lütfen.

[mty]

artık "return" destekleniyor olması lazım;

Function al() as String
return me.Items.Item("kisi_sayisi").text
End Function

bi dene istersen...

[shuckry]

Dim yaz = al()
Response.Write(yaz.ToString())
ile verdiğiniz fonksiyonu denedim ama yine aynı hatayı verdi.
javascriptte document.formum.kisi_sayisi.value gibi bişi return etmem lazım.
başka önerisi olan?

[Revne]

Dim deger
set deger=al()

seklinde bir dene

Kolay Gelsin

[shuckry]

Değişen birşey olmadı. deger=al() satırında aynı hatayı veriyor