دليل استخدام إجراءات VBAppAss.dll للمبرمجين بلغة Visual Basic 6.0

الدالة EncodeString

تشفير نص.

الصيغة:

Function EncodeString(Text As String, CodeNumber As Long) As String

الصنف:
TString.

الوسائط (Parameters):

الشرح:
تقوم هذه الدالة بتشفير نص و تحويله إلى سلسلة من الأرقام و الفواصل المنقوطة. النص المشفر الناتج يمكن فك تشفيره باستعمال الدالة DecodeString. مع استعمال نفس رقم التشفير المحدد في البارامتر CodeNumber.

الاستخدام:

Dim ObjString As New TString

Adodc1.Recordset("Password") = ObjString.EncodeString(Text1.Text, 500)

انظر أيضاً:
الدالة DecodeString

بداية الصفحة