با دستور sendkey چطوري متن رو كپي و پست كنم ؟

[hasht.rood]

سلام دوستان.
بنده يك صفحه اينترنتي دارم كه براي آپلود فايل هست.اين صفحه رو داخل فرمم با webbrowser لود كردم
وبا دستور WebBrowser1.Document.All("ufile").Click روي browse كليك ميكنم و پنجره انتخاب فايل باز ميشه.
حالا ميخواستم بدونم چطوري اين متن رو (c:\win.bmp) داخل اون بفرستم ؟ يا به عبارتي كپي كنم؟
خيلي ضروري دوستان خواهشآ كمكم كنيد

اينم عكس صفحه:


78756

اينك سورس برنامه:
Private Sub Command1_Click()
Clipboard.Clear
Clipboard.SetText Text1.Text
WebBrowser1.Document.All("ufile").Value = Text1.Text
WebBrowser1.Document.All("ufile").Click

End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "http://facebox.ir/up/upload_rename.php"
End Sub

عكس برنامه:
78760

دانلود: پروژه 78761

[MohammadGh2011]

سلام عليکم

با دستور sendkey چطوري متن رو كپي و پست كنم ؟
نميدونم درست منظورتون رو متوجه شدم يا نه.
با دستور زير ميتونيد متن رو Paste کنيد و اگه به جاي V حرف انگليسي C رو بگذاريد متنتون Copy ميشه.
Text1.SetFocus
SendKeys "^{V}"

با دستورClipboard خود VB هم ميتونيد متن رو کپي و Paste کنيد.
موفق باشيد

[hasht.rood]

در برنامه من دستور sendkey كار نميكنه
دوستان خواهش ميكنم خودتون تست بكنيد
خيلي ضروريه

[just4froum]

از كد زير استفاده كن ببين كارت راه ميافته


Private Sub Form_Load()
WebBrowser1.Navigate "http://facebox.ir/up/upload_rename.php"
End Sub


Private Sub Timer1_Timer()
Timer1.Interval = 1500
SendKeys "^v"
SendKeys "{enter}"
Timer1.Enabled = False
End Sub

Private Sub WebBrowser1_DownloadComplete()
On Error Resume Next
Clipboard.Clear
Clipboard.SetText Text1.Text
WebBrowser1.Document.All("ufile").Value = Text1.Text
WebBrowser1.Document.All("ufile").Click

Timer1.Enabled = True
End Sub

[hasht.rood]

بازم كار نكرد. نميدونم چرا كار نميكنه ؟
مغزم تركيد بخدا
اگه ميشه خودتون يه تست بكنين ببينين.
ممنون

[ameri110]

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

[meys34]

سلام
ببین این روشی که در نظر دارید خیلی منطقی نیست ولی بسته به هدفتون خوبه...

روش معقولش اینه که تو کد های Html دستکاری کنید و مثلا یه تکس باکس توی صفحه ایجاد کنید که بشه بهش آدرس داد و بعد اون فایل رو به سایت بفرسته...


به علت این که فیلد موجود در صفحه از نوع فایل است نمشیه به این روش بهش مقدار داد
اما یه راه دیگه هم داره که اینجاست... روشی که به نظرم رسید هم خیلی منطقی نیست ولی خوب این هم یه راهه دیگه (روش پیشرفته sendkey هستش) ...

1- برای راحتی کار source سایت رو ریختم توی فایل که موقع لود شدن هر دفعه نره از اینترنت اونو بیاره...
2- یه کد آماده دیده بودم که اسم button های msgbox رو فارسی میکرد ... اونو کمی تغییر دادم شد این...
3- اصل قضیه اینه ( ...SetWindowsHookEx(WH_CBT
این hook ، ایجاد شدن پنجره های جدید رو خبر میده به ما... ما هم هندل پنجره رو میگیریم و با یه تایمر روی دکمه داخلش کلیک میکنیم به همین سادگی...:لبخندساده::لبخندساد ه::لبخندساده:

سوالی بود در خدمتیم...

[elimiz]

اقا كارت حرف نداره...

[xrezax]

میشه بوسیله hook یا راه دیگه ای این صفحه رو مخفی کرد ؟؟

147740