ورود

View Full Version : ارور SendKeys



aleas2
جمعه 02 اسفند 1392, 10:17 صبح
دوستان پروژه بنده به دستور

SendKeys ("{tab}")
خطا میده مشکل چی؟
run-time error '70'

alirezabahrami
جمعه 02 اسفند 1392, 13:32 عصر
دوستان پروژه بنده به دستور

SendKeys ("{tab}")
خطا میده مشکل چی؟
run-time error '70'
سلام
در کجا ازاین دستوراستفاده میکنی؟

سید حمید حق پرست
جمعه 02 اسفند 1392, 15:56 عصر
سلام علیکم
شما بعد کمپایل پروژه تست کنید، در داخل پروژه اجرا کنید این اررور میده اما بعد کمپایل مشکلی نداره
موفق باشید.

یا علی (ع)

aleas2
جمعه 02 اسفند 1392, 18:41 عصر
کامپایل هم میکنم عمل نمیکنه!

سید حمید حق پرست
جمعه 02 اسفند 1392, 19:41 عصر
مشکلی نداره برای من کار میکنه
شما روی برنامه مورد نظر باید فوکوس کنید سپس کلید رو ارسال کنید. اگر تونستید نمونه سورستون بزارید تا تست کنم
موفق باشید.

یا علی (ع)

aleas2
جمعه 02 اسفند 1392, 19:49 عصر
مشکل اینه برنامه تو کامپیوتر خودم کار میکنه ولی رو سیستمی که ویندوز 98 روش نصب میکنم خطا میده !

alirezabahrami
جمعه 02 اسفند 1392, 20:16 عصر
مشکل اینه برنامه تو کامپیوتر خودم کار میکنه ولی رو سیستمی که ویندوز 98 روش نصب میکنم خطا میده !
سلام
یکبار هم با حذف علامت پرانتز () دوطرف "{tab}" امتحان کن!
یا علی

aleas2
جمعه 02 اسفند 1392, 23:26 عصر
نشد !
روش ديگه برای tab نیست؟

سید حمید حق پرست
جمعه 02 اسفند 1392, 23:53 عصر
سلام علیکم
یک ماژول براتون ضمیمه کردم تست کنید ببینید مشکل حل میشه
روش استفاده هم بصورت زیر :
MySendKeys "{tab}"
موفق باشید.

یا علی (ع)

meys34
شنبه 03 اسفند 1392, 15:15 عصر
اینجا هم هست... فقط نمیدونم تو 98 هم جواب میده یا نه



Dim WshShell As Object
Set WshShell = CreateObject("WScript.Shell")
WshShell.Sendkeys "{tab}"
Set WshShell = Nothing

aleas2
شنبه 03 اسفند 1392, 19:13 عصر
سلام علیکم
یک ماژول براتون ضمیمه کردم تست کنید ببینید مشکل حل میشه
روش استفاده هم بصورت زیر :
MySendKeys "{tab}"
موفق باشید.

یا علی (ع)

ممنون عزیز جواب داد