>... > Dim loDT As New OleDbDataAdapter("select * from Login", _ > "Provider=VFPOLEDB.1;Data Source=D:\Login.dbf;Password='';Collating Sequence=MACHINE") >... > loDT.Fill(loData, "Temp") >