Datareport Error

[dbasenoob]

i have error in my data report when i click the command1 it says
"Data Field 'datess' not found" but i have that in my database and in my datareport

here's the code

Private Sub Command1_Click()
Dim rs As New ADODB.Recordset
Dim myquery As String

    myquery = "select code,(datess+', '+lname+' '+fname) as name, addr" & _
    " from info;"
    rs.Open myquery, CN, adOpenStatic
If rs.RecordCount > 0 Then
    Set DataReport1.DataSource = rs
    DataReport1.Show
End If
End Sub

[brucevde]

The recordset contains the fields code, name and addr. Only those names can be specified in a Controls.DataField property on the datareport.

[Hack]

Moved to Reporting

[dbasenoob]

thanks for replying where i can make a changes? im not a good coder so make a quote so that i can i see what will i change

[brucevde]

The DataField property of one of the Controls on the DataReport is set to Datess it should be set to Name.

[dbasenoob]

i change it but it still error... what should i do

[brucevde]

what should i do

Check all controls in the datareport. check the database. post the error. Become a truck driver.

[dbasenoob]

its works now... but when i print is the preview print is still on page... how can i refresh it? to remove the previews print

[dee-u]

Are you doing it like this to print the report?

DataReport1.PrintReport

[dbasenoob]

nope only datareport1.show only... i will try that code mr dee-u thanks,salamat

[dee-u]

Filipino? No problem.

[dbasenoob]

i tried datareport1.printreport its still there the old record... how can i refresh it and remove the old record? yup pinoy ako mr dee-u hehehe...sensya kana po hindi pa ako magaling sa vb6 student pa lang po

[dee-u]

Will you try

Set DataReport1.DataSource = rs
DataReport1.Refresh
DataReport1.Show

[dbasenoob]

its still same...the old record is still in there...

[dee-u]

Could you post the code that you are currently using?

[dbasenoob]

Private Sub Command1_Click()
Dim rs As New ADODB.Recordset
Dim myquery As String

    myquery = "select code,(datess+', '+lname+' '+fname) as name, addr" & _
    " from info;"
    rs.Open myquery, CN, adOpenStatic
If rs.RecordCount > 0 Then
    Set DataReport1.DataSource = rs
    DataReport1.Show
End If
End Sub

this is works now...but when i print new data the old data is still on the page...

[dee-u]

You are using the same sql statement so it should be the same, or am I missing something?