BULK INSERT时发生错误 异常的EOF，原因是有空行!

BULK INSERT时发生错误 异常的EOF，原因是有空行!

或者文本结束时没0x0D0A。

//特别写一个过程来进行处理，找出这些问题。

long ll_rows,i,ll_read_len,ll_linecount,j
string ls_path

long ll_filehandle
blob{10485760} bl
byte bt[10485760]

ll_rows = dw_2.rowcount()

if ll_rows <1 then return
for i = 1 to ll_rows
yield()

if ib_stop then return

dw_2.selectrow(0,false)
dw_2.selectrow(i,true)

ls_path = dw_2.getitemstring(i,6) //filepath
ll_filehandle = FileOpen(ls_path, &
StreamMode!, read!,shared!, append!)

if ll_filehandle < 1 then continue

//先判断文件尾是否是0x0D0A
FileSeek64 (ll_filehandle,-2,FromEnd!)

filereadex(ll_filehandle,bl,2)

if byte(blobmid(bl,1,1)) <> 13 or byte(blobmid(bl,2,1)) <> 10 then
dw_2.setitem(i,2,dw_2.getitemstring(i,2) + "---结尾不为\r\n")
//messagebox("异常","文件：~n" + ls_path + "~n结尾不为\r\n")
fileclose(ll_filehandle)
continue
end if

//判断文件中间是否存在连续的0D0A0D0A这样的空行（跳行），其实严格地说，还有其他不可打印字符（控制字符是否跳行没测试）也可能引起。我遇到的问题就是别人导给我的数据，有一列的汉字被切掉了一半！搞死人了。我叫他先把那一栏加个因为字符，再切掉一个字符（等于切掉半个汉字了），他有不肯定搞，还是他根本不晓得导出的结果会那样。再说几百兆的文件他也不可能逐行去看。所以其他跳行原因请具体分析。

FileSeek64 (ll_filehandle,1,FromBeginning!)


DO while(true)
ll_read_len = filereadex(ll_filehandle,bl,10485760)
bt = GetByteArray(bl)//这里很关键，用blobmid去逐个取字符很慢。
if ll_read_len <4 then exit

ll_read_len -=3

for j = 1 to ll_read_len
yield()

if ib_stop then
fileclose(ll_filehandle)
return
end if

if mod(j,100000) = 0 then
st_odoa.text = "0x0D0A:" + string(ll_linecount)
st_ij.text = "J: " + string(j)
end if

if bt[j]<>13 then continue

if bt[j + 1] = 10 then
ll_linecount ++
else
continue
end if

if bt[j + 2] = 13 and bt[j + 3] = 10 then
dw_2.setitem(i,2,dw_2.getitemstring(i,2) + "---存在空行,在" + string(ll_linecount) + "行处!")
//messagebox("异常","文件：~n" + ls_path +&
//"~n在中间存在空行~n位置: 第:" + string(ll_rowcount) +&
//"行处!",question!,yesno!)
exit
end if
next

FileSeek64 (ll_filehandle,-3,FromCurrent!) //回退
loop

fileclose(ll_filehandle)
next
messagebox("提示","文件检查结束")