تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استفسار :- البحث في صفحة html
#1
السلام عليكم ورحمة الله


استفساري عن كود بعد دخولي  الى الموقع يقوم بالبحث عن كلمه معينه ومن ثم يقوم بتنزيل ملف

الكود الي عندي يقوم بادخالي الى الصفحه

   

بعد دخول الصفحه اريد ابحث في الhtml  عن كلمت  

إقتباس :downloadedfiles


اذا حصلت الكلمه
كود :
    <UL>
      <LI><A HREF="downloadedfiles/AP1BP541212.adi">.ADI file</A>
      <LI><A HREF="downloadedfiles/AP1BP541212.txt">.TXT file</A>
    </UL>


يقوم بانزال لي الملف
AP1BP541212.adi


للعلم اسم الملف يتغير كل مرة اقوم بالدخول
AP1BP541212

كود :
 Dim filename As String = Regex.Match(ReturnStr, "downloadedfiles/.+?\.adi", RegexOptions.IgnoreCase).Value

الكود الي عندي كان شغال لا اعرف ما حصل في الان 
هذا الكود بعد دخولي للموقع هو يقوم بالبحث عن الكلمه ومن ثم سحب الملف


كود :
   Dim EQSLURL As String = String.Format("http://www.eqsl.cc/qslcard/DownloadInBox.cfm?UserName={0}&Password={1}&RcvdSince={2}", eqslu.Text, eqslp.Text, cv)

                Using client As New WebClient() With {.Encoding = System.Text.Encoding.UTF8}


                    Dim ReturnStr As String = client.DownloadString(EQSLURL)
                    Dim filename As String = Regex.Match(ReturnStr, "downloadedfiles/.+?\.adi", RegexOptions.IgnoreCase).Value
                    If filename <> "" Then
                        Dim data() As Byte = client.DownloadData(String.Format("http://www.eqsl.cc/qslcard/{0}", filename))
                        Dim targetFilename As String = String.Format(Format1, Path.GetFileName(filename))
                        File.WriteAllBytes(targetFilename, data)

                        lblAttach.Text = String.Format(Format, Path.GetFileName(filename))


                    End If
                End Using


احتمال في غلط في الكود بارك الله فيكم

شكرا على المساعده

حاليا يعطيني غلط

إقتباس :Index (zero based) must be greater than or equal to zero and less than the size of the argument list.'

هنا

كود :
                       Dim targetFilename As String = String.Format(Format1, Path.GetFileName(filename))
الرد }}}
تم الشكر بواسطة: elgokr , elgokr , elgokr



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم