易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi excel内容转换格式导入sql

Delphi(Pascal) code:

......
qry8.SQL.Add('SELECT * from [sheet1$]');
......

qry3.SQL.Add('insert into epptable(epno,epname)');
qry3.SQL.Add('Values('+QuotedStr(qry8.fieldbyName('员工编号).AsString)+','+QuotedStr(qry8.fieldbyName('员工姓名).AsString)+')');



以上是excel内容导入表epptable,现要求excel表“员工编号”一列，自动转换为8位数值编号导入数据库表，如何实现？
比如excel中员工编号是1,导入表epptable是00000001；
          员工编号是020,导入表epptable是00000020

引用
试试用:
Format('%08d",[strtointdef(qry8.fieldbyName('员工编号).AsString,0)])


好像不行啊
Delphi(Pascal) code:

......
qry8.SQL.Add('SELECT * from [sheet1$]');
......

qry3.SQL.Add('insert into epptable(epno,epname)');
qry3.SQL.Add(' select LEFT('00000000',8 - LEN(QuotedStr(qry8.fieldbyName('员工编号).AsString)))'
+QuotedStr(qry8.fieldbyName('员工编号).AsString)+','+QuotedStr(qry8.fieldbyName('员工姓名).AsString)+')');'


我的少了'号
我的意思,先用strtointdef将qry8.fieldbyName('员工编号').AsString转成整型,然后用format�


相关问答：

delphi如何调用dll文件中的exe

请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？


无人回答？

做成资源� ......

Delphi怎么取返回内容中的指定部分.

返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

delphi 本地装载驱动 - Delphi / Windows SDK/API

delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......

delphi 2010 dbgrideh EhLib5.0.13 导出文件出错

Delphi(Pascal) code:

function DBGridEhToExportFile(dbgrideh:TDBGridEh;filename:string='导出的文件'):boolean ;
var ExpClass:TDBGridEhExportClass;
Ext:String;
savedialog1:tsavedialog;
b ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号