سلام کار کردن با حلقه فور رو بلدم ولی نمیدونم چرا پایین عمل نمیکنه
دوستان من اطلاعات چند تا عکس رو از وبسایت میگیرم و میریزم داخل حلقه فور تا با کتابخونه اسلاید اسلایدش کنم امام مشکلی که هست فقط عکس اخر رو نشون میده در صورتی که تست کردم تمام لینک عکس ها رو میگیره
ببینید این کدهاس تو قسمت addslide مقدار str3 که همون لینک عکس ها است رو ریختم ولی به تعداد لینک ها عکس نشون نمیده و فقط یه عکس باز میکنه
ممنون میشم راهنمایی کنید
Dim k() As String = Regex.Split("<img width='95'",get)
For i =1 To k.Length - 1
Dim str3 As String
str3 =k(i)
str3=str3.SubString(str3.IndexOf("' src='") +7)
str3=str3.SubString2(0,str3.IndexOf("' class='") -11) & "450x600.jpg"
Slidert.AddSlide("رنگ بندی متنوع", str3)
Dim filelist As List = File.ListFiles(File.DirDefaultExternal )
For Each fi As String In filelist
Dim Path As String =File.Combine(File.DirDefaultExternal , fi)
If fi.LastIndexOf (".JPG")>0 OR fi.LastIndexOf (".png")>0 Then
Slidert.AddSlide(fi , "file:" & Path )
End If
Next
سوال
solmos36 69
سلام کار کردن با حلقه فور رو بلدم ولی نمیدونم چرا پایین عمل نمیکنه
دوستان من اطلاعات چند تا عکس رو از وبسایت میگیرم و میریزم داخل حلقه فور تا با کتابخونه اسلاید اسلایدش کنم امام مشکلی که هست فقط عکس اخر رو نشون میده در صورتی که تست کردم تمام لینک عکس ها رو میگیره
ببینید این کدهاس تو قسمت addslide مقدار str3 که همون لینک عکس ها است رو ریختم ولی به تعداد لینک ها عکس نشون نمیده و فقط یه عکس باز میکنه
ممنون میشم راهنمایی کنید
Dim k() As String = Regex.Split("<img width='95'",get) For i =1 To k.Length - 1 Dim str3 As String str3 =k(i) str3=str3.SubString(str3.IndexOf("' src='") +7) str3=str3.SubString2(0,str3.IndexOf("' class='") -11) & "450x600.jpg" Slidert.AddSlide("رنگ بندی متنوع", str3) Dim filelist As List = File.ListFiles(File.DirDefaultExternal ) For Each fi As String In filelist Dim Path As String =File.Combine(File.DirDefaultExternal , fi) If fi.LastIndexOf (".JPG")>0 OR fi.LastIndexOf (".png")>0 Then Slidert.AddSlide(fi , "file:" & Path ) End If Nextلینک ارسال
به اشتراک گذاری در سایت های دیگر
4 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.