how to add image on vb-access 2003,how to save?how to retrieve? - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!


how to add image on vb-access 2003,how to save?how to retrieve?

i am a student,i do one sample project in vb.6 and access 2003.i designed one form for students entry,name and address, etc,this details are saved in database and retrive in my choice.
but i have plan to insert student pictrue in my 'students entry form'.i have no idea about this picture insertation.can u please help me, how to insert pictrue,how to stored in database,how to retrive photo on my search command.

i also attached my source code,module source code and screen shot of form.

yours faithfully
boby kuriakose

----------------------------------SOURCE CODE ENTRY FORM---------------------------------

Dim rs As New ADODB.Recordset
Dim rs1 As New ADODB.Recordset
Dim rs2 As New ADODB.Recordset
Dim rs3 As New ADODB.Recordset
Dim rs4 As New ADODB.Recordset
Dim rs5 As New ADODB.Recordset
Dim i As Integer
Dim sngDailyRate As Single
Dim sngNumberOfDays As Integer
Dim sngHireCost As Single

Dim strLastName As String * 20
Dim strFirstName As String * 20
Dim s As String
Dim sql As String

Private Sub Form_Load()
sngDailyRate = 12.5
sngNumberOfDays = 0
' Days.Text = Format(sngNumberOfDays, "General Number")
sngHireCost = 0
strLastName = ""
strFirstName = ""
HireCost = Format(sngHireCost, "Currency")
Optname.Value = True
txtsrchname.Enabled = True
cmddelete.Enabled = False

--------------------MODULE SOURCE CODE------------

Option Explicit
Global cn As New Connection
Public Sub open_connection()
End Sub

Public Sub Main()
If cn.State Then cn.Close
cn.Open "microfox", "t", "a26yo1a01i0oo8Qr5ty51w521bipa"
End Sub
Sign In or Register to comment.