تشخیص متن تکست

[mashgholom 34]

سلام به دوستای گلم

دوستان دو تا سوال داشتم:

1- یه فایل تکست در هاستمون داریم توی این فایل تکست یه شماره هست و یه نام و توی خود برنامه یه پنل داریم که یه قسمت برای نمایش شماره هست یه قست برای نمایش نام میشه کدی نوشت که برنامه تشخیص بده کدوم متن توی کدوم قسمت قرار بده؟

2- چطور میشه به همون برنامه ی بالا بگیم اگر یه خط به فایل تکست اضافه شد بیا یه پنل درست کن و هر متن توی قسمت مربوطش قرار بده؟

ممنون از همگی که اینقدر به من لطف دارن

[ارمین رمضانی دلیجانی 381]

سلام عزیز دل برادر امکانش هست الان سورس رو مینویسم چند لحظه ی صبرکن

[مهدی ایزدی 9,203]

سلام

این نام و عدد به چه صورتی توی هاست قرار گرفتن ؟

مثلا اینجوری:

مهدی#1

عماد#2

مهران#3

آرمین#4

مصطفی#5

...

چطوری؟

[mashgholom 34]

سلام

این نام و عدد به چه صورتی توی هاست قرار گرفتن ؟

مثلا اینجوری:

مهدی#1

عماد#2

مهران#3

آرمین#4

مصطفی#5

...

چطوری؟

علیک سلام داداش گلم هنوز قرار نگرفتن میخوام بدونم چطور باید قرار بدم که بعدا برای تشخیص قرار گرفتن توی قسمت مورد نظربرنامه راحت باشه و مشکل ساز نشه نظرت چیه داداش؟

[ارمین رمضانی دلیجانی 381]

دوست عزیز شما میخوای با این کارچه کاری رو انجام بدی؟

[mashgholom 34]

دوست عزیز شما میخوای با این کارچه کاری رو انجام بدی؟

آرمین جان اجازه بده فعلا چیزی نگم تا ببنم کار به چه شکل پیش میره فقط به کمک تو و بقیه احتیاج دارم

داداش تونستی برام سورس بنویسی؟آرمین جان ممنون میشم یه سری توضیحات هم بگی که هم برای من مفید باشه هم برای دوستان

[مهدی ایزدی 9,203]

خب جواب

شما گفتی که یک عدد داری و یک حروف که نمیدونی اولی عدده یا دومی !

خب:

از کتابخانه ها HttpUtils2 رو Add کن.

بعدش:

Sub Globals
Dim HttpJob1 As HttpJob
Dim address As String = "http://mehdiizadi.persiangig.com/foremad.html"
Dim fulltext As String
Private lblText As Label
Private lblNum As Label
End Sub

من یک فایل Html آزمایشی برات درست کردم که توی بالا داری میبینی آدرسش رو.

اینجا میاییم Initialize رو انجام میدیم و بعدش میگیم که HttpJob1 بیاد دانلود کنه address رو.

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("main")
HttpJob1.Initialize("MyJob1",Me)
HttpJob1.Download(address)
End Sub

خب وقتی که دانلود تمام شد بیاد string fulltext رو مساوی job.getstring قرار میدیم (کل متن توی فایل Html رو به string میدیم)

و بعدش هم رویداد check رو فعال میکنیم

Sub JobDone (Job As HttpJob)
fulltext = Job.GetString
check
End Sub

در آخر میاییم از طریق split که قبلا هم بهت توضیح دادم در رابطه با اون رنج IP ها میاییم دو قسمت رو با دو تا String به نام های part1 و part2 میگیریم.

و بعدش هم یک Boolean تعریف میکنیم به نام chck و میگیم که چک کنه که part2 عدد هست(IsNumber) یا نه !!!

توی شرط میگیم که اگه chck مثبت بود خب یعنی اینکه part2 عدد بوده پس حتما part1 حروف هست در نتیجه lblNum رو مساوی part2 و lblText رو مساوی part1 قرار میدیم.

در غیر این صورت اگه chck مثبت نبود(منفی بود) lblNum رو مساوی part1 و lblText رو مساوی part2 قرار میدیم.

Sub check
Dim parts() As String = Regex.Split("#",fulltext)
Dim part1 As String = parts(0).Trim
Dim part2 As String = parts(1).Trim
Dim chck = IsNumber(part2) As Boolean 
If chck = True Then
lblNum.Text = part2
lblText.Text = part1
Else
lblNum.Text = part1
lblText.Text = part2
End If
End Sub

موفق باشی !

[mashgholom 34]

عالی بود داداش ممنون که اینقدر هوای ما رو داری فقط دادا اگه خط جدید به تکست اضافه بشه چی؟

الان مهدی#1 رو میگره و در طول و عرض معینی در پنل کوچییکی نمایش میده

حالا اگه یه خط دیگه اضافه کنیم مثلا عماد#2 اونوقت میاد یه lblname با lbltext دیگه اضافه کنه ؟ منظورم حالت حلقه ماننده دادا

[مهدی ایزدی 9,203]

خواهش دوست من.

با این کد نه . صبر کن VB Seo سایت رو دارم نصب میکنم . جوابتو میدم در اولین فرصت

[mashgholom 34]

ممنون داداش. پس منتظر راهنمایی و توضیح جامعت که واقعا عالیه هستم

با تشکر

[مهران محمودی 778]

مرسی از مهدی، من خودم دیدم همه حواسش پیش این سورس بود و جواب منم نمیداد :دی

خب یه کار دیگه هم میشه کرد ! به هر روشی که دوست داری اطلاعات رو در داخل دستگاه ذخیره کن ! نمونه برای ذخیره سازی:

لینک تاپیک

و سپس خط به خط اطلاعات رو بخونید:

لینک تاپیک

کدهایی که در این 2 تاپیک قرار دارن رو کمی تغییر بدی و بعضی کدهای مهدی مثل جداسازی یا split رو هم اضافه کنی،میتونی کارت رو راه بندازی ! البته خیلی طولانی میشه :دی

مهدی خودش جوابتو میده شک نکــــــن

[mashgholom 34]

مرسی از مهدی، من خودم دیدم همه حواسش پیش این سورس بود و جواب منم نمیداد :دی

خب یه کار دیگه هم میشه کرد ! به هر روشی که دوست داری اطلاعات رو در داخل دستگاه ذخیره کن ! نمونه برای ذخیره سازی:

لینک تاپیک

و سپس خط به خط اطلاعات رو بخونید:

لینک تاپیک

کدهایی که در این 2 تاپیک قرار دارن رو کمی تغییر بدی و بعضی کدهای مهدی مثل جداسازی یا split رو هم اضافه کنی،میتونی کارت رو راه بندازی ! البته خیلی طولانی میشه :دی

مهدی خودش جوابتو میده شک نکــــــن

سلام دادا

خودمم از دیشب دارم روش کار میکنم اما هی به بنبست میرسم. تا الان تونستم فایل بگیرم و ذخیره کنم اما برای split کردن و اوردنش تو حلقه که برای هر خط مثلا یه lblname و lblnum درست کنه مشکل پیدا میکنم خیلی خیلی سخته. ممنون از اینکه زحمت کشیدی اما منتظر جواب دادا مهدی میمونم

با تشکر

[مهدی ایزدی 9,203]

عماد جان این تاپیک رو ببین: کلیک کن

[mashgholom 34]

عماد جان این تاپیک رو ببین: کلیک کن

مرسی دادا منتظر بودم. ممنون بابت توجهت دادا نخواستم اونجا پیامی بدم گفتم همینجا ازت تشکر کنم.

بازم ممنون

با تشکر

[مهدی ایزدی 9,203]

خواهش دوست من

باز بقیه کارها حدودا راحته.

اسم ها رو میگیری و شماره ها رو هم میگیری . از طریق حلقه اضافه میکنی به Activity یا Panel

حقیقت دوست ندارم لقمه چرب و نرم آماده تو دهن کسی بزارم چون ذهنت تنبل میشه.

توی اون تاپیک هم گفتم . مهران قراره یک سورس هم بزاره به عنوان مثال که مقدار ها رو از Page اینترنتی بگیره و توی Activity نشون بده

منتظر سورس مهران نباش . خودت دست به کار بشو(هرجاش مشکل برات پیش اومد بپرس) . البته باز سورس مهران رو هم که بزاره باز خودت کارهایی رو باید انجام بدی روش.

به هر حال انشالله که موفق باشی توی این پروژه و تمام پروژه هایی که مدّ نظر داری.با سعی و تلاش . ما هم تا جایی که وقت و ذهن یاری بکنه با افتخار پاسخگو سوالات شما هستیم.