Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #107.41K
 | Private Sub Save_Record() Dim cmd As New OleDbCommand Dim sSQL As String = String.Empty Dim arrImage() As Byte Dim myMs As New IO.MemoryStream Dim bSaveImage As Boolean = False Dim strImg As String = String.Empty Try If Not IsNothing(Me.pic1.Image) Then Me.pic1.Image.Save(myMs, Me.pic1.Image.RawFormat) arrImage = myMs.GetBuffer Else arrImage = Nothing End …  |