文本生成 不允许有空行 结果生成的数据偶尔会有空行？
此主题相关图片如下：1.png
甚至出现了换行和空格
此主题相关图片如下：2.png
经过核查：对应的数据库表里面不存在空行值，麻烦老师帮忙看看 为什么会插入一个空行呢？和出现换行和空格呢？谢谢！
代码如下：
Dim c As Integer =DataTables("JobPosition").Compute("count(id)")
output.show(c)
Dim Cols1() As String = {"mkcode","zwbianhao","shuxingbiama","zwname"}
Dim s As String
s=Date.now() & "," & c
s = s.TrimStart(",")
FileSys.WriteAllText(bb.Text & "\JobPosition.txt",s & vbcrlf,False, Encoding.Default)
For Each dr As DataRow In DataTables("JobPosition").DataRows
s = ""
For i As Integer = 0 To Cols1.Length -1
If s > "" Then s = s & ","
If dr.IsNull(Cols1(i)) = False Then
s = s & dr(Cols1(i))
End If
Next
s = s.TrimStart(",")
FileSys.WriteAllText(bb.Text & "\JobPosition.txt", s & vbcrlf , True, Encoding.Default)
Next
[此贴子已经被作者于2021/8/5 16:10:07编辑过]
加好友 
发短信
Post By：2021/8/5 16:00:00 [只看该作者]
