ASP ilə serial nömrə .

ASP ilə serial nömrə .

Asp proqramlaşdırma dili çox geniş bir informasiyaya malikdir. Bir çox funksiyanı asp ilə həyata keçirmək mümkündür. Bu dərsimiz də siz asp ilə 25 simvoldan ibarət təsadüfü yaranan serial nömrələrin necə hazlırlanmasını öyrənəcəksiniz. Bu funkiya bir çox yerdə lazım olur.


<%
Dim simvollar, key

Randomize 'Tesadufu tapilmasi ucun
simvollar="ZXCVBNMASDFGHJKLPOIUYTREWQ0123456789" 'Serialda istifade edilecek simvollar.

For i=1 to 25
If i=6 or i=11 or i=16 or i=21 Then 'Simvollara her 5 simvoldan bir - isaresi olsun.
key=key&"-"
End If
key = key & Mid(simvollar,Round(Rnd*Len(simvollar)+1),1)
Next

Response.Write(key) 'Ekranda gosterilsin.
%>



Kodlardan aydın olduğu kimi ilk növbədə Randomize əmri daxil edilməlidir. Asp-də hər hansı təsadüfü əməliyyat həyata keçiriləcəksə bu zaman istifadə etdiyin yerin üst hissələrində Randomize əmrini yazmaq vacibdir. Simvollar isə istifadə ediləcək simvollardır. Ora istənilsə ancaq 0-9 kimi rəqəm də yazıla bilər. Bu zaman serial nömrənin bütün simvolları rəqəmdən ibarət olacaqdır.