MoBiN.R (02-08-08)
دوست عزیز، با این توصیفات نرم افزار من هم می تونه از مودم شما استفاده کنه.برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید ارسالی توسط noorsoft برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
به هر حال در بخش مراجع نرم افزار TmobileManager مناسب کار شماست.
امیدوارم سورسش بدردتون بخوره!
با سپاس
آرمینبرای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
MoBiN.R (02-08-08)
لینک فایلها خرابه . نمیشه دانلود کرد
با سلام!برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید ارسالی توسط noorsoft برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
حق با شماست! بعضی مواقع این مشکل پیش میاد.
فایل رو تو انجمن بالاگذاری کردم:
TMM.rar
در ضمن اگر تمایل داشتید یه سری کد از همین تابع CreateFile بذارید، شاید با کمک دوستان بتونیم کمکتون کنیم.برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
بازم اگر مشکل داشتید، دوستان و من در خدمتیم.
با سپاس
آرمینبرای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
ارمین جان این برنامه همون مشکلی که من میگم را داره
من وقتی موبایل را به کامپیوتر وصل میکنم com5 به سیستم اضافه میشه ولی اگه سعی کنین با هر برنامه ای بازش کنید already in use میده و در هایپر ترمینال هم فقط با انتخاب نام مودم میشه به اون دستورات ارسال کرد
این یک نمونه برنامه است که با این تابع کار میکنه
آخرین ویرایش توسط noorsoft در تاریخ 03-08-08 انجام شده است
MoBiN.R (03-08-08)
دوست عزیر! فایل پیوست شده ی شما رو دیدم. متوجه شدم چیه ولی اثری از سورس اصلی توش نبود. یعنی توش اصلا تابع CreateFile پیدا نکردم. لطفا" فایل رو دوباره بررسی کنید. با سپاس آرمینبرای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید ارسالی توسط noorsoft برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
با عرض پورش لینک را اصلاح کردم اگه ممکنه دوباره ببینید
داخل این زیر برنامه بود
کد:Private Function OpenPort(sPort As String) As Boolean Dim sa As SECURITY_ATTRIBUTES hFakePort = CreateFile(sPort, _ 0, _ FILE_SHARE_READ Or FILE_SHARE_WRITE, _ sa, _ OPEN_EXISTING, _ FILE_ATTRIBUTE_NORMAL, _ 0) OpenPort = hFakePort <> -1 End Function
آخرین ویرایش توسط noorsoft در تاریخ 03-08-08 انجام شده است
این هم تعریف تابع
کد:Private Declare Function CreateFile Lib "kernel32" _ Alias "CreateFileA" _ (ByVal lpFileName As String, _ ByVal dwDesiredAccess As Long, _ ByVal dwShareMode As Long, _ lpSecurityAttributes As SECURITY_ATTRIBUTES, _ ByVal dwCreationDisposition As Long, _ ByVal dwFlagsAndAttributes As Long, _ ByVal hTemplateFile As Long) As Long
|
با سلام!
دوست عزیز، noorsoft!
ببخشید که دیر جوابتون رو می دم. من در مورد CreateFile تحقیق کردم و یه چیزایی در موردش گیر آوردم.برای مشاهده این لینک/عکس می بایست عضو شوید ! برای عضویت اینجا کلیک کنید
بعد هم رفتم سراغ ارسال / دریافت اطلاعات برای یه پورت COM.
تو این پست یه فایل پیوست کردم، که شامل یک سری کد و مقاله در مورد این تابع هستش. البته کد Cpp و C# هم داره که خیلی خوبه. در مورد MSCOMM هم مختصری مطلب داره. امیدوارم بدردتون بخوره.
CreateFile.rar
اگر بازم مشکل پیدا کردید، دوستان و بنده در خدمتیم.
با سپاس
آرمین
'چو ایران نباشد، تن من مباد
Dim Armin As Iranian
If Iran.Enabled = False Then Armin.Enabled = False
1 کاربر در حال مشاهده این موضوع. (0 عضو و 1 میهمان)
Bookmarks