I'm totally lost. I downloaded a calendar that was design by Jim Lunde in Access 97. I converted it to Access 2000, imported it into my database for use. Just opening up the form causes an error under the Public Sub PutIndata() secton. I have know idea what to do. PLEASE HELP I NEED A CALENDAR LIKE THIS...
Public Sub PutInData()
Dim sql As String
Dim f As Form
Dim db As Database
Dim rs As Recordset
Dim mynum
Dim i As Integer
Set f = Forms!frmCalender
For i = 1 To 37
f("text" & i) = Null
Next i
sql = "SELECT * FROM [tblInput] WHERE ((MONTH(InputDate) = " & f!month & " AND YEAR(InputDate) = " & f!year & "
) ORDER BY InputDate;"
Set db = CurrentDb()
Set rs = db.OpenRecordset(sql, dbOpenSnapshot)
Public Sub PutInData()
Dim sql As String
Dim f As Form
Dim db As Database
Dim rs As Recordset
Dim mynum
Dim i As Integer
Set f = Forms!frmCalender
For i = 1 To 37
f("text" & i) = Null
Next i
sql = "SELECT * FROM [tblInput] WHERE ((MONTH(InputDate) = " & f!month & " AND YEAR(InputDate) = " & f!year & "
) ORDER BY InputDate;"Set db = CurrentDb()
Set rs = db.OpenRecordset(sql, dbOpenSnapshot)
