تغییر نوع رشته به کلید

[gharibeh223]

سلام . وقت بخیر .
تعریف کلید های میانبر را خود کاربر انحام می ده . و من به صورت رشته ذخیره می کنم .
چه جوری می تونم رشته به کلید تبدیل کنم ؟

[amirsajjadi]

من منظورتون رو از تبدیل رشته به کلید نفهمیدم
آیا منظور شما همون SendKeys.Send است ؟

[gharibeh223]

نه .

من منظورم اینه که کلید های میانبر برنامه رو خود کاربر قابلیت تغیر داشته باشه .
نام کلید زده شده توسط کاربر رو به صورت رشته ذخیره می کنم مثلا "F2" .

حالا می خوام کلید زده شده توسط کاربر رو با رشته ای که ذخیره کردم مقایسه کنم چه جوری این کارو بکنم ؟

[mehrnoosh_al62]

Protected Overloads Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
If msg.Msg = 256 Then

If keyData.ToString() = "F2" Then
'دستورات مورد نظر

End If
End If
Return MyBase.ProcessCmdKey(msg, keyData)
End Function

[gharibeh223]

راه حل دیگه ای کسی سراغ داره ؟

[saman_itc]

id as string



ol_cm = New OleDbCommand(" select * from P_G_N where id = " & id.Text.ToString & " ", ol_cn)
dro = ol_cm.ExecuteReader
If dro.HasRows = True Then
Msgbox_Custom("کلید پرداخت غیر نقدی تکراری می باشد.لطفا کلید را اصلاح کنید", 1, 2, " خطا ذخیره کلید پرداخت غیر نقدی ")
Exit Sub
End If

شما برای تبدیل به کلید کافی قبل از ثبت کردن یه select کنی اگه معادل اون مقدار پیدا کردی پیغام بده که کلیدتون تکراری و عملیات انجام نشه

[gharibeh223]

ایییییییییییییی خدااااااااااااااااااااااا اا

لاقل سول رو کامل بخونید

[saman_itc]

من جوابتون کامل دادم

[gharibeh223]

من جوابتون کامل دادم

نه سوال من در مورد فیلد کلیدی دیتا بیس نیست .

در مورد تغییر کلید میانبر برنامه است

به جواب mehrnoosh_al62 توجه کنید .

[gharibeh223]

لطفا یه تفکری روی این موضوع بزنید !!! قضیه بقرنجه

[mehrnoosh_al62]

به جواب mehrnoosh_al62 توجه کنید .

دوست عزیز شما مشکلتون دقیقا چیه که جواب من نمیتونه حلش کنه؟ اگه ممکنه سوالتون رو دقیق بگید و اینکه پست فوق تو حل کردن مسئلتون چه نقصی داره...

[gharibeh223]

راه حل شما مشکل منو به نوعی حل می کنه .
اما من می خواهم برای راحتی بیشتر این عبارت رشته ای رو به Keys یا انواع دیگه از نوع کلید تبدیل کنم بعد مقایسه خودمو انجام بدم .

[gharibeh223]

اگر راه حل دیگه ای نیست من همونو ادامه بدم .

[اَرژنگ]

اگر راه حل دیگه ای نیست من همونو ادامه بدم .
http://barnamenevis.org/forum/showthread.php?t=119734