Hi. This is the full code I saved to my database.
Private Sub Command55_Click()
Dim strPic As String, strPath As String
Dim blnRotate As Boolean
strPath = "c:\Users\"
strPic = Me.Image23.Picture
blnRotate = WIA_RotateImage(strPath & strPic, 90, strPath & strPic)
Me.Image23.Picture = strPic
End...