Referans ID Atama
Merhaba Arkadaşlar bu makalemizde sitelerde çokça örneklerini gördüğümüz referans numarasının nasıl oluşturulduğunu basit bir örnekle göstereceğim. Bundan sonraki makalelerde rezervasyon kayıtlarında referans numarasının nasıl kullanıldığını göstereceğim. Örneğimizde 8 karakterden oluşan referans numarasını oluşturacağız. Sayfanıza 1 adet Label ve Button ekleyin.
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim liste() As String = {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "R", "S", "T", "U", "W", "X", "Y", "Z", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9"}
Dim r As Random = New Random()
For i = 0 To 7
'Bu kısımda rastgele 0-10000 sayıları içerisinden herhangi
'bir sayı atasın. Bu sayıyı Mod (34) metodu ile karşılık
'gelen stringi alacağız.
liste(i) = liste(r.Next(10000) Mod (34))
Label1.Text = Label1.Text & liste(i)
Next
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Label1.Text = ""
End Sub
End Class
Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN