excel数字字符串 导入sqlserver(100分)

我的数据库某表中有几个字符串，很多时候都会出现纯数字的情况。<br>我需要编程控制EXCEL导入，但是从EXCEL在导入纯数字的字符串的时候就有问题。<br>请问如何解决？<br>1.不能直接用sql导入语句。<br>2.不想让用户输入时加‘号<br>3.如果是通过txt文件或者csv文件作为过度，请给点代码吧。<br>我主要是在利用csv另存文件时，不希望出提示保存

从EXCEL导入如果不使用程序 可以使用sqlserver的导入导出 很方便的。<br><br>如果编程的话，访问EXCEL 下面的代码对你有帮助 从EXCEL读出来的都是字符串类型<br>实际是一个单元格一个单元格访问的<br>begin<br>&nbsp; EA:= CreateOleObject( 'Excel.Application' );<br>&nbsp; EA.WorkBooks.Open(opendialog1.FileName);<br>&nbsp; blankLine := 0;<br>&nbsp; line:=3;<br>&nbsp; while 2&gt;1 do<br>&nbsp; begin<br>&nbsp; &nbsp; if &nbsp;Ea.cells[line,1].value='' then Exit;<br>&nbsp; &nbsp; xiangmubianhao := Ea.cells[line,1].value;<br>&nbsp; &nbsp; riqi := Ea.cells[line,2].value;<br>&nbsp; &nbsp; jianshedanwei := Ea.cells[line,3].value;<br>&nbsp; &nbsp; xiangmumingcheng := Ea.cells[line,4].value;<br>&nbsp; &nbsp; mianji := Ea.cells[line,5].value;<br>&nbsp; &nbsp; shigongdanwei := Ea.cells[line,6].value;<br>&nbsp; &nbsp; shigongdidian := Ea.cells[line,7].value;<br>&nbsp; &nbsp; zerenshubianhao := Ea.cells[line,8].value;<br>&nbsp; &nbsp; beizhu := Ea.cells[line,9].value;<br>&nbsp; &nbsp; sqlText := 'insert into projectList'+<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;' (项目编号,建设单位,项目名称,建筑面积,施工单位,项目地点,责任书编号,备注)'+<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;' values ('''+xiangmubianhao+''','''+jianshedanwei+''','''+xiangmumingcheng+''','''+<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;mianji+''','''+shigongdanwei+''','''+shigongdidian+''','''+<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;zerenshubianhao+''','''+beizhu+''')';<br>&nbsp; &nbsp; qry.close;<br>&nbsp; &nbsp; qry.sql.text:= sqlText;<br>&nbsp; &nbsp; qry.execsql;<br>&nbsp; &nbsp; line:=line+1;<br>&nbsp; end;<br>&nbsp; EA.quit;<br>end;

lizhijie98 ,我现在用的就是这种方法。针对你给我的代码，如果<br>&nbsp;xiangmubianhao := Ea.cells[line,1].value<br>&nbsp;xiangmubianhao是字符串类型，excel这一列数据出现了纯数字组成的字符串的时候就会出现类型错误啊，我的困扰也在这里啊

你自己查查大富翁的资料就可以了<br><br>如果是数字类型需要做转换的<br>trim(string(Exlapp.cells[i, cell].value));<br>就可以了

接受答案了.