Pessoal,
em meu programa de cadastro resolvi colocar fotos também, coloquei para salvar o caminho das fotos, até aí tudo bem..., o problema é que se eu não inserir alguma foto o programa não aceita (ele não aceita o campo em branco), pensei em colocar uma condição antes, mas tentei e não consegui. alguém sabe como posso resolver?
segue meu código abaixo:
Private Sub cmdincluir_Click(Index As Integer)
On Error GoTo AddErr
SavePicture Image1(0).Picture, App.Path & "Fotos Apartamentos" & "foto" & "_" & "ID" & "_" & txtcodigo.Text & ".jpg"
dtaapart.Recordset.Update
cmdincluir(0).Caption = "&Incluir"
cmdnovo.Visible = True
cmdexcluir(1).Visible = True
cmdexcluir(1).Enabled = True
cmdincluir(0).Visible = False
cmdcancelar(1).Visible = False
cmdeditar(0).Visible = True
cmdfechar.Visible = True
Call Lock_Form_Controls(Me)
SSTab1.Tab = 0
MsgBox "Registro Incluído com Sucesso!", vbOKOnly
Exit Sub
AddErr:
MsgBox Err.Description
End Sub
Att.
Marcelo
