在读写文本文档时出现的多行读写错误 我读的文本是这样的: User: admin Time: 11:30 Date: 02-25 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在控制面板--(数据源)ODBC,可以建一个DSN,选打开*.txt文件的驱动就可以了。我建了一个名字中元件的DSN,指向一个名字为元件.txt文件.下面是使用方法。Const cnstr = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=元件;Initial Catalog=C:\DOCUMENTS AND SETTINGS\ADMINISTRATOR\MY DOCUMENTS\文档"Dim cn As ADODB.ConnectionDim rs As ADODB.RecordsetPrivate Sub Command1_Click() Set cn = New ADODB.Connection cn.Open cnstr Set rs = New ADODB.Recordset Set rs.ActiveConnection = cn rs.LockType = adLockOptimistic rs.Open "select * from 元件.txt " rs.AddNew rs.Fields!ID = 1 rs.Fields!Name = "lizhi" rs.Update rs.Close cn.Close End Sub 管理员权限的运行的程序问题 ACCESS数据库中存的是这些字符"{\rtf1\fbidis...." 如何实现关闭一个窗体后立刻出现另一个窗体 Winsock 的 TCP 协议,连接太久会自动掉线? 软件加密,想实现这种加密功能,一般怎么做? 如何更换图片? 我的公司运转不景气,心情不妥,散分! 如何用VB连接两个不同域的数据库SQL Server? 高分求教使用WINSOCK建立TELNET连接 向各位VB版的项目经理请教一个关于需求书的问题 求Exchange server 2000 的序列号,在线。。。。。。。。。。。。。 关于MTS COM简单问题
我建了一个名字中元件的DSN,指向一个名字为元件.txt文件.
下面是使用方法。Const cnstr = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=元件;Initial Catalog=C:\DOCUMENTS AND SETTINGS\ADMINISTRATOR\MY DOCUMENTS\文档"Dim cn As ADODB.Connection
Dim rs As ADODB.RecordsetPrivate Sub Command1_Click()
Set cn = New ADODB.Connection
cn.Open cnstr
Set rs = New ADODB.Recordset
Set rs.ActiveConnection = cn
rs.LockType = adLockOptimistic
rs.Open "select * from 元件.txt "
rs.AddNew
rs.Fields!ID = 1
rs.Fields!Name = "lizhi"
rs.Update
rs.Close
cn.Close
End Sub