cargar una foto y guardarla en mysql desde visual basic 6.0

[gustavoareyesv]

Hola de Nuevo...

tengo un sistema en visual basic 6.0 y necesito cargar una foto y guardarla en una tabla echa en mysql server 5.1 lo que he logrado es cargar la foto pero no guardarla aquí les dejo el código a ve quien me puede ayudar... gracias de ante mano...!

Private Sub ChameleonBtn1_Click() 'cargar foto frente

CommonDialog1.Filter = "BMP|*.bmp|JPEG|*.jpeg|GIF|*.gif|JPG|*.jpg|Todos|* .*"
CommonDialog1.ShowOpen

If CommonDialog1.FileName <> " " Then
Picture1.Picture = LoadPicture(CommonDialog1.FileName)
Text1 = CommonDialog1.FileName
Else
MsgBox "No Selecciono Ninguna Imagen"
End If

End Sub

hay la busca y la muesta en el picture1 pero no se como guardarla...! ayúdenme por favor....