+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: کمک برای ساخت نرم افزار (/showthread.php?tid=3005)
کمک برای ساخت نرم افزار - amolhackers - 01-13-2013
سلام من میخوام یه برنامه ای بنویسم که مانند برنامه mouse and key recorder باشه اما خیلی ساده
کسی میتونه کمکم کنه
میخوام به این صورت باشه (زمان مشخص شود با زدن استارت موس روی فرم مورد نظر بره بعد متن وارد کنه و اینتر کند )
مثلا تو یک روم چت این متن هایی که به برنامه دادم بر اساس زمان مشخص شده ارسال کنه
![[عکس: 13580829591.jpg]](http://up.persianscript.ir/uploads/13580829591.jpg)
RE: کمک برای ساخت نرم افزار - Amin_Mansouri - 01-13-2013
درود
باید هندل برنامه ها رو بگیری
و با sendmessage واسشون مسیج بفرستی
چت رومه تحت وبه یا نرم افزاره ؟
تحت نرم افزار بشه با هندل گرفتن میشه کاریش کرد
RE: کمک برای ساخت نرم افزار - amolhackers - 01-17-2013
مرسی دوست عزیز Amin_Mansouri
من برای شما پیام خصوصی گذاشتم لطفا بخونین منتظر جوابتون هستم
RE: کمک برای ساخت نرم افزار - Amin_Mansouri - 01-17-2013
درود
دیدم ویدءو برنامه رو
یه منو هم هست که باید منو انتخاب بشه
برنامه بفرستید اگر تونستم سر وقت اکی میکنم
RE: کمک برای ساخت نرم افزار - amolhackers - 01-17-2013
منظورتون همون برنامه ای که باهاش رکوردر را خواستم انجام بدم؟
http://load.avacschat.net/builds/2.2.1/AVACS_Live_Chat_for_Computer_v221.jar
مرسی از زحمات شما بخاطر کمک و جواب دادن به همه دوستانی که مشکل دارن در برنامه نویسی.
RE: کمک برای ساخت نرم افزار - Amin_Mansouri - 01-17-2013
این چت رومه irc هست ؟
خوب mirc روش ست کن chanserv بزار اگر Irc هست.
اگر نیست این کدی که نوشتم :
کد:
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Command1_Click()
Dim a As Long
Dim retval As Long
a = FindWindow("SunAwtFrame", vbNullString)
retval = SetForegroundWindow(a)
Sleep (1000)
SendKeys "{enter}"
Sleep (1000)
SendKeys "salam"
Sleep (1000)
SendKeys "{enter}"
Sleep (100)
End Subبرنامه شما جاوا هست و تحت جاوا(املاتور) میاد بالا بحثش با برنامه exe فرق داره
کد بالا بشین تکمیل تر کن سردرد گرفتم تو چت رومه
RE: کمک برای ساخت نرم افزار - amolhackers - 01-18-2013
براتون پیام خصوصی گذاشتم .
نتونستم کاری بکنم سورس رو واستون ارسال کردم تو پیام خصوصی
اگه میشه تکمیلش کنی ممنون میشم
چت رومش باحاله
RE: کمک برای ساخت نرم افزار - amolhackers - 01-19-2013
داداش منتظرتم