3 ضمیمه
با دستور sendkey چطوري متن رو كپي و پست كنم ؟
سلام دوستان.
بنده يك صفحه اينترنتي دارم كه براي آپلود فايل هست.اين صفحه رو داخل فرمم با 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
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
سلام عليکم
نقل قول:
با دستور sendkey چطوري متن رو كپي و پست كنم ؟
نميدونم درست منظورتون رو متوجه شدم يا نه.
با دستور زير ميتونيد متن رو Paste کنيد و اگه به جاي V حرف انگليسي C رو بگذاريد متنتون Copy ميشه.
Text1.SetFocus
SendKeys "^{V}"
با دستورClipboard خود VB هم ميتونيد متن رو کپي و Paste کنيد.
موفق باشيد
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
در برنامه من دستور sendkey كار نميكنه
دوستان خواهش ميكنم خودتون تست بكنيد
خيلي ضروريه
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
از كد زير استفاده كن ببين كارت راه ميافته
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
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
بازم كار نكرد. نميدونم چرا كار نميكنه ؟
مغزم تركيد بخدا
اگه ميشه خودتون يه تست بكنين ببينين.
ممنون
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
به علت این که فیلد موجود در صفحه از نوع فایل است نمشیه به این روش بهش مقدار داد
چجوری میشه بهش مقدار دادش رو من هم نمیدونم
یه زمانی کار خودمم هم خیلی گیر بود و مجبور شدم برای فرستادن فایل از اف تی پی استفاده کنم
1 ضمیمه
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
سلام
ببین این روشی که در نظر دارید خیلی منطقی نیست ولی بسته به هدفتون خوبه...
روش معقولش اینه که تو کد های Html دستکاری کنید و مثلا یه تکس باکس توی صفحه ایجاد کنید که بشه بهش آدرس داد و بعد اون فایل رو به سایت بفرسته...
نقل قول:
به علت این که فیلد موجود در صفحه از نوع فایل است نمشیه به این روش بهش مقدار داد
اما یه راه دیگه هم داره که اینجاست... روشی که به نظرم رسید هم خیلی منطقی نیست ولی خوب این هم یه راهه دیگه (روش پیشرفته sendkey هستش) ...
1- برای راحتی کار source سایت رو ریختم توی فایل که موقع لود شدن هر دفعه نره از اینترنت اونو بیاره...
2- یه کد آماده دیده بودم که اسم button های msgbox رو فارسی میکرد ... اونو کمی تغییر دادم شد این...
3- اصل قضیه اینه ( ...SetWindowsHookEx(WH_CBT
این hook ، ایجاد شدن پنجره های جدید رو خبر میده به ما... ما هم هندل پنجره رو میگیریم و با یه تایمر روی دکمه داخلش کلیک میکنیم به همین سادگی...:لبخندساده::لبخندساد ه::لبخندساده:
سوالی بود در خدمتیم...
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
1 ضمیمه
نقل قول: با دستور sendkey چطوري متن رو كپي و پست كنم ؟
میشه بوسیله hook یا راه دیگه ای این صفحه رو مخفی کرد ؟؟
ضمیمه 147740
