[omgemoako]

hi I'm working on a project which includes connection to a foxpro database. My problem is when I query a command which has a condition it's not working but it is working in foxpro 7.0. It only works if I don't assign a condition.
here is my code please help me.. thanks..

 Dim conFoxpro As New OleDbConnection("provider=provider;Data Source=path;Collating Sequence = general") 'Create a new Foxpro connection
        Dim cmdFoxpro As New OleDbCommand("Select * from pe_civil_status WHERE DELETED() and date_updt >= {^" & min_date_update.Year & "-" & min_date_update.Month & "-" & min_date_update.Day & " " & min_date_update.Hour & ":" & min_date_update.Minute & ":" & min_date_update.Second & "}", conFoxpro)
        MsgBox("Select * from pe_civil_status WHERE DELETED() and date_updt >= {^" & min_date_update.Year & "-" & min_date_update.Month & "-" & min_date_update.Day & " " & min_date_update.Hour & ":" & min_date_update.Minute & ":" & min_date_update.Second & "}")
        Dim daFoxpro As New OleDbDataAdapter
        Dim dsFoxpro As New DataSet
        Try
            conFoxpro.Open()
            daFoxpro.SelectCommand = cmdFoxpro
            daFoxpro.SelectCommand.ExecuteNonQuery()
            daFoxpro.Fill(dsFoxpro, "pe_civil_status")
            dgMysql.DataSource = dsFoxpro.Tables("pe_civil_status")
            MsgBox(dsFoxpro.Tables("pe_civil_status").Rows.Count)
        Catch ex As Exception
            MsgBox(ex.ToString)
        Finally
            conFoxpro.Close()
            conFoxpro.Dispose()
            cmdFoxpro.Dispose()
            daFoxpro.Dispose()
            daFoxpro.Dispose()
            dsFoxpro.Dispose()
        End Try

[CharlieMay]

Your connection string doesn't look right. I'm assuming Provider and Path are variables that hold the actual provider string and path string. These will need to be concatenated in or use string.format to incorporate their actual strings.
something like:

Dim constr As String = String.Format("provider = {0};Data Source={1};Collating Sequence= general", provider, path)
Dim conFoxpro As New OleDbConnection(constr)

This post has been edited by CharlieMay: 02 March 2011 - 05:24 AM

[omgemoako]

CharlieMay, on 02 March 2011 - 12:23 PM, said:

Your connection string doesn't look right. I'm assuming Provider and Path are variables that hold the actual provider string and path string. These will need to be concatenated in or use string.format to incorporate their actual strings.
something like:

Dim constr As String = String.Format("provider = {0};Data Source={1};Collating Sequence= general", provider, path)
Dim conFoxpro As New OleDbConnection(constr)

Thanks for the response.. This is my connection string used: Dim conFoxpro As New OleDbConnection("Provider=vfpoledb;Data Source=D:\Production\Data\;Collating Sequence=general").. I really don't figure out what's wrong.. bfft..

[CharlieMay]

Shouldn't there be a filename after Data\ ?

Check Out ConnectionStrings.Com for help with connectionstrings. I'll see what I can find when I get back.

[omgemoako]

CharlieMay, on 03 March 2011 - 12:37 AM, said:

Shouldn't there be a filename after Data\ ?

Check Out ConnectionStrings.Com for help with connectionstrings. I'll see what I can find when I get back.

I have tried adding the name of the table< Dim conFoxpro As New OleDbConnection("Provider=vfpoledb;Data Source=D:\Production\Data\pe_civil_status.dbc;Collating Sequence=general;Exclusive=No;Deleted=True") 'Create a new Foxpro connection> but it prompts me an error: "Invalid path or file name. at System.Data.OleDbConnectionInternal.ctor(OleDbconnectiontionString constr, OleDbConnection connection)"
I'm sure I have put the correct name of the table..

[CharlieMay]

Double check the path. Go into you d drive and make sure you have a folder named Production. Then go into production and make sure a folder called Data is there and last of all. Double-Click on Data and make sure that pe_civil_status.dbc is in it.

The error is saying that is either isn't finding that file (pe_civil_status.dbc) in that path or that full path does not exist.

[omgemoako]

CharlieMay, on 03 March 2011 - 01:22 AM, said:

Double check the path. Go into you d drive and make sure you have a folder named Production. Then go into production and make sure a folder called Data is there and last of all. Double-Click on Data and make sure that pe_civil_status.dbc is in it.

The error is saying that is either isn't finding that file (pe_civil_status.dbc) in that path or that full path does not exist.

Yes I'm very sure of that.. I'm having a hard time..

[CharlieMay]

OK, that is .DBF not .DBC. Have you tried D:\Production\Data\pe_civil_status.dbf in your connectionstring?

[omgemoako]

CharlieMay, on 03 March 2011 - 01:31 AM, said:

OK, that is .DBF not .DBC. Have you tried D:\Production\Data\pe_civil_status.dbf in your connectionstring?

Yes I have tried that. It still don't work.. Do you think Deleted=True and Exclusive=No in my connection string are valid?

[CharlieMay]

Do you have any .DBC file in that folder?

[omgemoako]

CharlieMay, on 03 March 2011 - 01:59 AM, said:

Do you have any .DBC file in that folder?

do you mean any other .dbc file in my source path? Yes I have.

[CharlieMay]

OK, from what I've just read. The .DBC is a database container meaning you have a database. The DBF is a Free File of the table but can be accessed with the .DBC

So does the .DBC contain the pe_civil.status.dbf file?

If so, then that is the file you need to specify in your string.