first record not add

[ranesmitas]

In Visual Basic i create code to add record that to auto increcment so following code


sql = "select max(job_order_no) as job_order_no from job_order"
Set rs1 = conn.Execute(sql)

If rs1("job_order_no") = null Then
rs1("job_order_no") = 1
Else
Text1.Text = rs1("job_order_no") + 1

End If

when i run and click add button it gives error
Invalid use of null

and when i add one record in access database it work propery but
it gives error when 1st record insert

why it gives error please tell what is problem

[jrtox]

In Visual Basic i create code to add record that to auto increcment so following code


sql = "select max(job_order_no) as job_order_no from job_order"
Set rs1 = conn.Execute(sql)

If rs1("job_order_no") = null Then
rs1("job_order_no") = 1
Else
Text1.Text = rs1("job_order_no") + 1

End If

when i run and click add button it gives error
Invalid use of null

and when i add one record in access database it work propery but
it gives error when 1st record insert

why it gives error please tell what is problem

If rs1.RecordCount=0 Then
        rs1.Addnew
        rs1("job_order_no") = 1 ' Add data also for  the other field. 
        rs1.Update
Else
        Text1.Text = rs1("job_order_no") + 1
End If
 
 

Try this One

Regards
Ervin