轉貼請注明來自http://blog.csdn.net/a11s 作者:董含君
呵呵,有數(shù)據庫當然用數(shù)據庫,SQL Server多好用, mySQL多好用... 不能給客戶端隨便裝服務啊,那就access或者其他單機的xsl之類,或者干脆XML
XML是好東西,就是對于用戶來說,還是有點復雜,比如大小寫區(qū)分,過多的尖括號等等,格式要求也很嚴格..
論到最簡單的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的人來說,還是繼續(xù)XML吧,因為那個環(huán)境下用起來就簡單了
下載文檔
