转贴请注明来自http://blog.csdn.net/a11s 作者:董含君
blog已经迁移到http://a11s.cnblogs.com
呵呵,有数据库当然用数据库,SQL Server多好用, mySQL多好用... 不能给客户端随便装服务啊,那就access或者其他单机的xsl之类,或者干脆XML
XML是好东西,就是对于用户来说,还是有点复杂,比如大小写区分,过多的尖括号等等,格式要求也很严格..
论到最简单的txt了
例子 c:\Inetpub\cc.txt
----------------------------------
a,b,c,d
11,22,33,44
----------------------------------
保存啊保存.下面就是程序部分
还是用VB6,响应的SQL连接字符串请参阅http://blog.csdn.net/a11s/archive/2005/10/12/501023.aspx
-----------------------------------
Private Sub Form_Load()
Dim oconn As New ADODB.Connection
Dim oRs As New ADODB.Recordset
oconn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"Dbq=c:\inetpub\;" & _
"Extensions=asc,csv,tab,txt;" & _
"Persist Security Info=False"
oRs.Open "Select * From cc.txt", _
oconn, adOpenStatic, adLockReadOnly, adCmdText
If oRs.RecordCount < 1 Then Exit Sub
oRs.MoveFirst
List1.AddItem "a=" + CStr(oRs("a"))
List1.AddItem "b=" + oRs("b")
List1.AddItem "c+1=" + CStr(oRs("c") + 1)
List1.AddItem "d=" + oRs("d")
oRs.Close
oconn.Close
Set oRs = Nothing
Set oconn = Nothing
End Sub
------------------------------------
运行结果啊,运行结果
至于insert update delete...就是语句的问题了,很明显不可能不MS SQL 强,但是,这个是以够用为原则...
对于习惯了DotNet的人来说,还是继续XML吧,因为那个环境下用起来就简单了
)
