ایجاد اتوماتیک یوزر به تعداد زیاد

[dr.pantagon]

سلام
یک سوال داشتم که هر چی گشتم نتونستم چیزی پیدا کنم

من دارم روی یک برنامه کار می کنم که برای تکمیل قسمت اکانتینگش نیاز به ایجاد یوزر به صورت اتوماتیک دارم یعنی مثلا ادمین سایت بیاد و تو تکس باکس مربوط به تعداد یوزر 100 رو وارد کنه و یک استارت برای یوزر ها انتخاب کنه یعنی مثلا 3 حرف اول با ajx شروع بشه و برنامه از ajx1 تا ajx100 رو بسازه.
اگر کسی ایم کار رو انجام داده سورس بزاره اگر هم که نه کمک کنید تا با هم ببریمش جلو

تشکر

[milade]

سلام


dim i
for i=0 to txt_num.txt
Dim rng As New RNGCryptoServiceProvider

Dim buff(4) As Byte

rng.GetBytes(buff)

dim x= Convert.ToBase64String(buff)
'این برای تولید حرف بود
dim xxx=txtstart+x

حالا xxx رو با دستور insert بفرست به بانک
بای

[dr.pantagon]

سلام


dim i
for i=0 to txt_num.txt
Dim rng As New RNGCryptoServiceProvider

Dim buff(4) As Byte

rng.GetBytes(buff)

dim x= Convert.ToBase64String(buff)
'این برای تولید حرف بود
dim xxx=txtstart+x

حالا xxx رو با دستور insert بفرست به بانک
بای

جالب بود فکر نمی کردم با یک حلقه حل بشه دستت درد نکنه تشکر ویژه :کف:

یک تست می کنم دستت بازم درد نکنه

[dr.pantagon]

بازم سلام
آقا دستت درد نکنه جواب داد ولی این خیلی خیلی رندوم ایجاد می کنه


username
testkixLcOM=
testgCTJe8s=
testH/JjvPA=
testlQtqKLc=
testFfzY+NY= من نمی خوام حروف کوچک وبزرگ باشه و کاراکتر های وِیژه نمی خوام مثل مساولی و اسلش

فقط حروف کوچک و عدد

لطفا تو این هم کمک کنید

[dr.pantagon]

لطفا یکی کمک کنه

فقط حروف کوچک و عدد

[el_abdollahi]

جایی گفته بودین که بعد از حروف ثابت بقیه اون رندوم باشه؟

[dr.pantagon]

بله این کار رو هم با استفاده از این
dim xxx=txtstart+x
دوست خوبمون اقا milade (http://barnamenevis.org/forum/member.php?u=58861) انجام دادن
لطفا سریع تر خیلی بهش نیاز دارم

[milade]

با یه تابع replace هر چی رو می خوای پاک کن
در مورد کوچکی همیه تابع هست که الان خاطرم نیست اون همه رو کوچیک می کنه
موفق باشی