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

الدالة DNSUIDStrToDNSUIDRec

تحويل نص DNSUID إلى سجل DNSUID.

الصيغة:

Function DNSUIDStrToDNSUIDRec(UIDStr As String) As TDNSUIDRec

الصنف:
TString.

الوسائط (Parameters):

الشرح:
هذه واحدة من دوال تحويل أرقام DNSUID. رقم DNSUID هو سلسلة نصية (String) مكونة من 20 رقماً (مثلاً 62020050110194124031)، و يتم توليد هذه الأرقام بحيث لا يمكن أن يتكرر الرقم مرة أخرى. بالإضافة إلى كونه سلسلة نصية، يمكنك التعامل مع الرقم على أنه سجل يتكون من 10 حقول من النوع Byte، و كذلك يمكنك التعامل معه على أنه مصفوفة ذات 10 عناصر من النوع Byte (كل رقمين متتاليين في السلسلة النصية يمثلان بايتاً واحدة)، مع العلم أن تحويل النص إلى سجل أو مصفوفة يبدأ من اليسار إلى اليمين. حيث تقوم هذه الدالة بتحويل رقم DNSUID من نص إلى سجل ذي 10 حقول من النوع Byte. السجل المعاد هو من النوع TDNSUIDRec.
طول نص البارامتر UIDStr يجب أن يكون 20 خانة مكونة من الأرقام فقط. إذا لم يكن طوله 20 خانة، أو إذا تسببت عملية التحويل إلى بايتات في حدوث خطأ، فإن جميع حقول السجل تضبط على الصفر.
يمكنك توليد أرقام DNSUID باستعمال الدالة GetDNSUIDStr أو إحدى أخواتها، و يمكنك استعمال هذه الأرقام كمعرفات فريدة لا تتكرر.

الاستخدام:

Dim ObjString As New TString
Dim UIDRec As TDNSUIDRec
Dim UIDString As String

UIDString = ObjString.GetDNSUIDStr()
UIDRec = ObjString.DNSUIDStrToDNSUIDRec(UIDString)

انظر أيضاً:
الدالة DNSUIDRecToDNSUIDStr
الدالة DNSUIDArrToDNSUIDStr
الدالة DNSUIDStrToDNSUIDArr
الدالة GetDNSUIDArr
الدالة GetDNSUIDRec
الدالة GetDNSUIDStr

بداية الصفحة