.:: رمزي كردن اطلاعات ذخيره شده ::.

[Mehr@ban]

با سلام خدمت همه اساتيد:
يه كار ابتكاري كردم !!! :خجالت:
اونم اينه كه زماني كه اطلاعات رو كاربر ميخواد بوسيله فرم تهيه شده وارد جدول كنه اطلاعات درست وارد ميشه ولي مرحله ورود اطلاعات به جدول ها با ماسك خواصي مثل "*" ذخيره بشه !!!! :متعجب::متعجب::متعجب::متعجب:

حلا سوالم اينه كه اگر كسي با كد نويسي بخواد اطلاعات توي بانك رو در بياره فقط با ستاره ها "*" مواجه ميشه يا نه اطلاعات ماسك نشده رو دريافت ميكنه ؟؟؟؟ :متفکر::متفکر::متفکر::متفکر:


ممنون ميشم جوابمو بدين

[mohamad goodarzi]

ماسك جهت چگونگي ورود اطلاعات است به همين دليل اطلاعات در جدول بدون ستاره نمايش داده مي شود

[id1385]

سلام

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



Dim Code, DataString, location, Temp As String

Code = "85RTb_)ajI"

Private Sub Command2_Click()
MsgBox SET_AS_CODE_STRING("A string here")
End Sub

Private Function SET_AS_CODE_STRING(StrText As String) As String
Dim I As Integer
Temp$ = Empty
For I = 1 To Len(DataString$)
location = (I Mod Len(Code$)) + 1
Temp$ = Temp$ + Chr$(Asc(Mid$(DataString$, I, 1)) Xor _
Asc(Mid$(Code$, location, 1)))
Next I
SET_AS_CODE_STRING = Temp
End Function

http://barnamenevis.org/showthread.php?221938-%D9%86%D9%85%D9%88%D9%86%D9%87-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-%D8%A7%D9%86%D8%A8%D8%A7%D8%B1%D8%AF%D8%A7%D8%B1%D B%8C-%DA%A9%D8%A7%D9%85%D9%84

موفق باشید

[Mehr@ban]

سلام

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



Dim Code, DataString, location, Temp As String

Code = "85RTb_)ajI"

Private Sub Command2_Click()
MsgBox SET_AS_CODE_STRING("A string here")
End Sub

Private Function SET_AS_CODE_STRING(StrText As String) As String
Dim I As Integer
Temp$ = Empty
For I = 1 To Len(DataString$)
location = (I Mod Len(Code$)) + 1
Temp$ = Temp$ + Chr$(Asc(Mid$(DataString$, I, 1)) Xor _
Asc(Mid$(Code$, location, 1)))
Next I
SET_AS_CODE_STRING = Temp
End Function

http://barnamenevis.org/showthread.php?221938-%D9%86%D9%85%D9%88%D9%86%D9%87-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-%D8%A7%D9%86%D8%A8%D8%A7%D8%B1%D8%AF%D8%A7%D8%B1%D B%8C-%DA%A9%D8%A7%D9%85%D9%84



خیلی ممنون میشه یکم بیشتر توضیح که این کد رو کجا بذارم :متفکر::لبخند: