CSV 复制粘贴文本问题

Question

我给同事写了一个导入csv文件访问的小工具。有很多数据，所以我想用几行来测试它...... 问题是当我将几行从大 CSV 复制到新 CSV (COPY+PASTE) 时，程序无法识别逗号分隔符读取整行...没有 enc-decoding，只是简单的文本...

Header 这是+1行学位；学位名称；日期；KDAT；BIZSZ；相反名称；相反名称；KTGH；KTGHNAME；文本；PÜ.DATE；属于；要求；HALM.EGYENLEG；IDOSZAKI EGYTEN；KTGH / TK；FELOSZTAS；KTIP；KONSZ；KTGVIS 511199;其他材料;000000;14/12/2016;PK/1029;381;PENZTAR HOLDING KOZPONT;7001;Directorate ;80 Account payment;00000;5516.00;0.00;00000.00;5516.00;7001 T;5516.00;611; ;;

你遇到过这样的问题吗？

这是 ADOconnection 的连接字符串

  ConnectionString :=  'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+FilePath;    
  ConnectionString := ConnectionString+';Mode=Share Deny None;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Extended Properties=text';
  ConnectionString := ConnectionString+'Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=96;Jet OLEDB:Database Locking Mode=0;';
  ConnectionString := ConnectionString+'Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'+FelVesszo+'t Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;FMT=Delimited'+';';

Answer 1

问题已解决我修改了 ODBC 引擎以强制分隔符

HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Jet.0\Engines\Text
Format=Delimited(;)

CSV 复制粘贴文本问题

CSV copy paste text issue

csv

delphi-xe5

adoconnection