27-07-19, 05:21 AM
بارك الله فيك وفي ما تقدم من معلومات لاخوانك .
بصراحة لاول مرة افهم هذه الطريقة (اقصد المقارنة بين صورتين)
وجهزت دالة بناءا على مافهمته من الشرح ووجدته يعمل فجزاك الله خير.
بصراحة لاول مرة افهم هذه الطريقة (اقصد المقارنة بين صورتين)
وجهزت دالة بناءا على مافهمته من الشرح ووجدته يعمل فجزاك الله خير.
PHP كود :
Private Function ISsame(ByVal Image1 As String, ByVal Image2 As String) As Boolean
If IO.File.Exists(Image1) = False Or IO.File.Exists(Image2) = False Then MsgBox("لم يتم العثور على مسار كامل لصورة بالجهاز", MsgBoxStyle.Exclamation, "") : Exit Function
Dim b1() As Byte
Dim b2() As Byte
b1 = My.Computer.FileSystem.ReadAllBytes(Image1)
b2 = My.Computer.FileSystem.ReadAllBytes(Image2)
Dim Base1 As String = Convert.ToBase64String(b1)
Dim Base2 As String = Convert.ToBase64String(b2)
If Base1 = Base2 Then
Return True
Else
Return False
End If
End Function
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير

