ورود

View Full Version : خواهش کمک



اکبری
یک شنبه 27 آبان 1386, 15:07 عصر
با سلام
بنده با استفاده از Mscomm فایل های تکست را از پورت Com می گیرم.
اما تابع Instr در بیست درصد مواقع، رشته مشخص شده به عنوان پاین فایل را تشخیص نمی دهد و در نتیجه متن دو فایل در یک فایل ذخیره می شود.
ضمنا قبلا گفته شده بود که برای خواندن از پورت ،نیاز به تایمر یا حلقه نیست. اما برنامه من زمانی جواب داد که از تایمر استفاده نمودم.
لطفا لطفا راهنمایی نمایید(مخصوصا مورد مقایسه رشته)

مبین رنجبر
یک شنبه 27 آبان 1386, 16:39 عصر
برای مقایسه رشته ها فقط دستور inStr نیست ..شما میتونی از دستور Like استفاده کنی ... مثل زیر :



A = "ALI"
B = "ali"

If A Like B Then
Msgbox "Shabih Hast"
Else
Msgbox "Shabih nist"
End If

ali_habibi1384
یک شنبه 27 آبان 1386, 17:39 عصر
سرعت تایمرتون رو بیشتر کنید تا هیچ کاراکتری رو از فایل از دست ندین .

اکبری
یک شنبه 27 آبان 1386, 22:51 عصر
دوست عزیز، من کاراکتری را از دست نمی دهم. رشته مورد نظر در فایل خروجی هست. اما در هنگام مقایسه از زیر تیغ رد شده ولی رشته پایان فایل بعدی دیده شده است. در نتیجه دو فایل در یک فایل ذخیره می شود.
از طرفی شنیده بودم که با استفاده از Event مربوطه به پورت( On_com ) بدون نیاز به تایمر و اتوماتیک میشه هر وقت دیتا اومد اونو گرفت.
اما من هرچه سعی کردم جواب نداد و فقط Error ها روی این Event میومدند.

اکبری
سه شنبه 29 آبان 1386, 23:18 عصر
بابا کمک کنید با مرام هاااااااااااااااا

majidrezaei2007
چهارشنبه 30 آبان 1386, 14:04 عصر
از دستو strcomp راحت تر میتونی این کاررو انجام بدی چون خروجی اون Boolean است