PDA

View Full Version : سوال: پیدا کردن Value از کد داخل TextBox



Hamed-Beckham
سه شنبه 24 فروردین 1395, 13:43 عصر
با سلام خدمت همه دوستان
من یه Textbox دارم که تو کد HTML هستش !
میخواستم یکی از Value های داخلش رو توی TextBox2 کپی کنم !

مثال :


<movie title="Crazy About Tiffany's" year="2016" rated="N/A" released="19 Feb 2016" runtime="86 min" genre="Documentary" director="Matthew Miele" writer="Matthew Miele" actors="Jessica Biel, Katie Couric, Amy Fine-Collins, Fran Lebowitz" plot="A past to present fully authorized documentary of Tiffany & Co." language="English" country="USA" awards="N/A" poster="http://ia.media-imdb.com/images/M/MV5BNDcyODcwMjg3Nl5BMl5BanBnXkFtZTgwNjc5MTM4NzE@._ V1_SX300.jpg" metascore="40" imdbRating="6.8" imdbVotes="11" imdbID="tt3464290" type="movie" />



به طور مثال من می خوام Crazy About Tiffany's رو از داخل متن برداره و تو Textbox2 بزاره !

** این کد هارو از یه سایت خارجی ( http://www.omdbapi.com/?i=tt3464290&plot=full&r=xml ) لود کردم تو TextBox . ولی چون XML هستش نمیدونم چطور استخراج کنم !

انواع اقسام سایت های مختلف رو سرچ کردم و به جواب نرسیدم !
ممنون میشم جواب بدید .
با تشکر

Alirezanet
یک شنبه 12 اردیبهشت 1395, 08:37 صبح
با توجه به اینکه این متن شما یک تگ xml هست به راحتی میتونید از ابجکت element استفاده کنید تا بتونید به راحتی مدیریتش کنید.

Dim XTag As XElement = <movie title="Crazy About Tiffany's" year="2016" rated="N/A" released="19 Feb 2016" runtime="86 min" genre="Documentary" director="Matthew Miele" writer="Matthew Miele" actors="Jessica Biel, Katie Couric, Amy Fine-Collins, Fran Lebowitz" plot="A past to present fully authorized documentary of Tiffany & Co." language="English" country="USA" awards="N/A" poster="http://ia.media-imdb.com/images/M/MV5BNDcyODcwMjg3Nl5BMl5BanBnXkFtZTgwNjc5MTM4NzE@._ V1_SX300.jpg" metascore="40" imdbRating="6.8" imdbVotes="11" imdbID="tt3464290" type="movie"/>
Dim Result = XTag.Attribute("Title").Value


خط دوم هم من خصیصه title رو خوندم که مقدارش همون مقداری هست که میخواستید.

اگر هم این تگ رو از جایی دارید میخونید میتونید از متد parse استفاده کنید.


Dim XTag2 = XElement.Parse("YOUR STRING")