HELP INSERT INTO error invalid argument

[edgarbenilde]

hi, can someone help me please i got error here it's saying invalid argument..


in select statement some anybody help me...

 Dim strSQL As String
            Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ph1\TSmobileData\CopyTSMobile.mdb;Persist Security Info=true;Jet OLEDB:Database password=h1lt1")
            Dim cmd As New OleDb.OleDbCommand
            cn.Open()

            strSQL = "INSERT INTO [CopyTSMobile.mdb.dbo.ttmtransaction]select * from[Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\TSMobile.mdb;Persist Security Info=False;Jet OLEDB:Database Password=h1lt1].[TSMobile.mdb.dbo.ttmtransaction where sync=0]"
            cmd.CommandType = CommandType.Text
            cmd.CommandText = strSQL
            cmd.Connection = cn

            cmd.ExecuteNonQuery()
            cn.Close()