三九宝宝网宝宝百科宝宝知识

vb6 0中进行编程将TXT内容转成ACCESS的mdb怎么弄

02月12日 编辑 39baobao.com

[我用数码相机摄的像可用什么软件进行编辑]32款图片处理软件介绍 色友们大概没有人不知道Photoshop大名的,要想得到好的照片后期处理是必不可少的。但是Photoshop也不是万能的,况且它的资源占用也非常的大,那么有没有其...+阅读

创建mdb只用ADO还挺麻烦的,一般使用ADOX对象,使用以下方法,成功后用ADO对象打开.用后面的方法写入,不过你的分隔符号,的用":"及空格两种区分.字段也的相应修改.Dim cat As New ADOX.Catalog cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb" 以下是MSDN里文本存入ADO对象里的过程.Private Sub Class_Initialize() Dim fld As ADODB.Field Dim strRow As String Dim strField As String Dim intPos As Integer Set rsCustomers = New ADODB.Recordset With rsCustomers ' 将 CustomerID 设置为主键。 .Fields.Append "CustomerID", adChar, 5, adFldRowID .Fields.Append "CompanyName", adChar, 40, adFldUpdatable .Fields.Append "ContactName", adChar, 30, adFldUpdatable .Fields.Append "ContactTitle", adChar, 30, adFldUpdatable .Fields.Append "Address", adChar, 60, adFldUpdatable .Fields.Append "City", adChar, 15, adFldUpdatable .Fields.Append "Region", adChar, 15, adFldMayBeNull .Fields.Append "PostalCode", adChar, 10, adFldMayBeNull .Fields.Append "Country", adChar, 15, adFldUpdatable .Fields.Append "Phone", adChar, 24, adFldUpdatable .Fields.Append "Fax", adChar, 24, adFldMayBeNull ' 使用键集游标类型以允许更新记录。 .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open End With Open "Customers.txt" For Input As #1 Do Until EOF

(1) Line Input #1, strRow With rsCustomers .AddNew For Each fld In .Fields ' 如果找到一个 tab 分隔符,字段文本 ' 就在分隔符的左边。 If InStr(strRow, Chr

(9))0 Then ' 将位置移动到 tab 分隔符。 intPos = InStr(strRow, Chr

(9)) ' 将字段文本赋值给 strField 变量。 strField = Left(strRow, intPos - 1) Else ' 如果没有找到 tab 分隔符,则字段文本 ' 是行中的最后一个字段。 strField = strRow End If ' 去掉引号。 If Left(strField, 1) = Chr(34) Then strField = Left(strField, Len(strField) - 1) strField = Right(strField, Len(strField) - 1) End If fld.Value = strField ' 从文本行中去掉字段值。 strRow = Right(strRow, Len(strRow) - intPos) intPos = 0 Next .Update .MoveFirst End With Loop Close End Sub

以下为关联文档:

如何判断化学反应能否进行首先考虑热力学。没有其他功的情况下,△G可以作为判据。题主说的电解水就属于引入了其他功——电功。很多有前景的反应其实都是△G>0的反应,怎样实现呢?上帝说,要有光。例如光解...

语文学科如何进行德育渗透许静霞 语文教材中,很多课文,或真实生动地展现我们民族的优良传统,或热情沤歌我们民族的精神,或精彩地描绘美丽多娇的祖国山河,或深刻阐述生命意义,因此,在具体的语文教学活动中,充...

请教一下数控车床ug软件的编程流程谢谢先画好回转零件,可以同时将毛坯零件一起画好,定好加工坐标系(跟车床的坐标系对应方向) 在坐标系下面新建加工几何体workpiece,里面选好part和blank实体。 然后在workpiece下面新...

如何快速学习UG数控编程1、学习UG数控编程,先学会CAD,有了这个基础,会让你学起UG健步如飞。 2、学会编程简单,要编好程序难,建议你先学习《数控加工技术》里的数控加工工艺,然后学习数控铣、加工中心编程...

如何学习UG数控编程1、学习UG数控编程,先学会CAD,有了这个基础,会让你学起UG健步如飞。 2、学会编程简单,要编好程序难,建议你先学习《数控加工技术》里的数控加工工艺,然后学习数控铣、加工中心编程...

我想学编程请问该怎么入门我的建议是首先学习C语言和VB,这是两种不同风格的基础知识。然后可以根据自身的兴趣和发展方向来选择各种编程语言。如C++,C#,JAVA等等。当你学习的时候你自然会发现算法和数...

一个实例搞定MATLAB界面编程 pjimage m学习中遇到的问题 ??%x=xlsread('C:\Documents and Settings\Administrator\桌面\2.xls'); time1=1980:2009; plot(time1,x,'m'); [lin,col]=size(x); years=lin; %将原始数据转化为增长率数据,...

企业可以随意对自用或作为存货的房地产进行重新分类吗不可以 企业不得随意对自用或作为存货的房地产进行重分类。企业有确凿证据表明房地产用途发生改变,满足下列条件之一的,才应当将投资性房地产转换为其他资产或者将其他资产转...

太极拳教学如何快速进行太极拳入门首先要从简单的套路学起。 比如24式简化太极拳就很好。它动作不多,时间短(4-5分钟),式子较全面。当时全国一些名家编这个套路时,还考虑到它的动作符合人的运动生理,既能得到锻练又...

推荐阅读
图文推荐