| | |
Please Help Me
Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site
![]() |
I am new in VB & I am having problem in Filter ( See Form2). My another problem is my boss want to see all Follow Up Report (Call Report of the Customer; Form6). Generally he want to see current FollowUp but he want when needed he can see each Follow Up Report.
I have given code for this but it show error. Please help. (Form6)
Adodc1.RecordSource = "select * from Table2"
Adodc1.Recordset("FOLLOW_UP_DATE") = DTPicker1.Value
Adodc1.Recordset("CURRENT_FOLLOW_UP") = Text1.Text
Adodc1.Recordset("NEXT_FOLLOW_UP_DATE") = DTPicker2.Value
Adodc1.Recordset.Update
Adodc1.RecordSource = "select * from Follow_Up"
If Adodc1.Recordset("1st_Follow_Up_Date") = Null Then
Adodc1.Recordset("1st_Follow_Up_Date") = DTPicker1.Value
Adodc1.Recordset.Update
End If
If Not Adodc1.Recordset("1st_Follow_Up_Date") = "" Then
Adodc1.Recordset("2nd_Follow_Up_Date") = DTPicker1.Value
End If
I have given code for this but it show error. Please help. (Form6)
Adodc1.RecordSource = "select * from Table2"
Adodc1.Recordset("FOLLOW_UP_DATE") = DTPicker1.Value
Adodc1.Recordset("CURRENT_FOLLOW_UP") = Text1.Text
Adodc1.Recordset("NEXT_FOLLOW_UP_DATE") = DTPicker2.Value
Adodc1.Recordset.Update
Adodc1.RecordSource = "select * from Follow_Up"
If Adodc1.Recordset("1st_Follow_Up_Date") = Null Then
Adodc1.Recordset("1st_Follow_Up_Date") = DTPicker1.Value
Adodc1.Recordset.Update
End If
If Not Adodc1.Recordset("1st_Follow_Up_Date") = "" Then
Adodc1.Recordset("2nd_Follow_Up_Date") = DTPicker1.Value
End If
![]() |
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: video splitter in VB 6.0...plz help on a doubt...its urgent.
- Next Thread: Timeout Expired
| Thread Tools | Search this Thread |
* 6 429 2007 access activex add age append application basic beginner birth bmp calculator cd cells.find click client code college column component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report retrieve save search sendbyte sites sort sql sql2008 sqlserver subroutine table tags textbox time urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows






