SOLVED - Column Value - How???

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   hi
How to get value this ('" & TAREFAS_TECNICO & "');" ??
>>>In FORM<<<
If Record.Item(TAREFAS_NUMERO).Value <> "" Or _
            Record.Item(TAREFAS_TECNICO).Value <> "" Or _
            Record.Item(TAREFAS_TIPO).Value <> "" Or _
            Record.Item(TAREFAS_BAIRRO).Value <> "" Then
                adoCN.Execute "INSERT INTO tab_Tarefas_Geral (nome) VALUES ('" & TAREFAS_TECNICO & "');"
                frmTarefasGeral.LoadTarefasGeral
                adoCN.Close
            ReportTarefasGeral.PopulateHeaderRows

            ReportTarefasGeral.Navigator.CurrentFocusInHeadersRows = True
       End If
>>>In Module <<<
Public Const TAREFAS_NUMERO = 0
Public Const TAREFAS_TECNICO = 1
Public Const TAREFAS_TIPO = 2
Public Const TAREFAS_BAIRRO = 3
when i click 'save', recording the value setting in module.

thanks

Codejock v. 11.6
Visual Basic 6
Win XP PRO SP3

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
Pparma Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 02 October 2008 Location: Brazil Status: Offline Points: 5	Post Options Post Reply Quote Pparma Report Post Thanks(0) Quote Reply Topic: SOLVED - Column Value - How??? Posted: 08 October 2008 at 3:27pm
	hi How to get value this ('" & TAREFAS_TECNICO & "');" ?? >>>In FORM<<< If Record.Item(TAREFAS_NUMERO).Value <> "" Or _ Record.Item(TAREFAS_TECNICO).Value <> "" Or _ Record.Item(TAREFAS_TIPO).Value <> "" Or _ Record.Item(TAREFAS_BAIRRO).Value <> "" Then adoCN.Execute "INSERT INTO tab_Tarefas_Geral (nome) VALUES ('" & TAREFAS_TECNICO & "');" frmTarefasGeral.LoadTarefasGeral adoCN.Close ReportTarefasGeral.PopulateHeaderRows ReportTarefasGeral.Navigator.CurrentFocusInHeadersRows = True End If >>>In Module <<< Public Const TAREFAS_NUMERO = 0 Public Const TAREFAS_TECNICO = 1 Public Const TAREFAS_TIPO = 2 Public Const TAREFAS_BAIRRO = 3 when i click 'save', recording the value setting in module. thanks Codejock v. 11.6 Visual Basic 6 Win XP PRO SP3