1009645
شنبه 08 تیر 1392, 09:21 صبح
سلام دوستان و اساتید ؛
بنده تصمیم داشتم برنامه ای برای ارسال پیام خصوصی د سایت خونه بنویسم ! کد اولیه برنامه به این صورت هستش :
Private Sub cmdCommand1_Click()
wb.Document.GetElementById("title").Innertext = "Onvan"
wb.Document.GetElementById("vB_Editor_001_textarea").value = "Matn"
End Sub
اما زمانی که روی cmdCommand1 کلیک می کنم برنامه عنوان رو به درستی قرار میده اما متن رو درست قرار نمیده !!!
من همچنین این کد ها رو هم تست کردم اما جوابی نگرفتم :
wb.Document.GetElementById("title").Innertext = txtOnvan.Text
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Value = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).OuterHtml = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Innertext = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Innerhtml = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").Innertext = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").Innerhtml = "Matn"
فقط در این کد :
wb.Document.GetElementById("vB_Editor_001_textarea").OuterHtml = "Matn"
اون تکست متن بالای قسمت تکست باکس پیام به نمایش درمیاد { عکس ضمیمه شد}
106311
از دوستان به خاطر کمکشون متشکرم و منتظر پاسخ هاتون هستم ! ممنون .
بنده تصمیم داشتم برنامه ای برای ارسال پیام خصوصی د سایت خونه بنویسم ! کد اولیه برنامه به این صورت هستش :
Private Sub cmdCommand1_Click()
wb.Document.GetElementById("title").Innertext = "Onvan"
wb.Document.GetElementById("vB_Editor_001_textarea").value = "Matn"
End Sub
اما زمانی که روی cmdCommand1 کلیک می کنم برنامه عنوان رو به درستی قرار میده اما متن رو درست قرار نمیده !!!
من همچنین این کد ها رو هم تست کردم اما جوابی نگرفتم :
wb.Document.GetElementById("title").Innertext = txtOnvan.Text
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Value = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).OuterHtml = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Innertext = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").children(0).Innerhtml = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").Innertext = "Matn"
wb.Document.GetElementById("vB_Editor_001_textarea").Innerhtml = "Matn"
فقط در این کد :
wb.Document.GetElementById("vB_Editor_001_textarea").OuterHtml = "Matn"
اون تکست متن بالای قسمت تکست باکس پیام به نمایش درمیاد { عکس ضمیمه شد}
106311
از دوستان به خاطر کمکشون متشکرم و منتظر پاسخ هاتون هستم ! ممنون .