摘要: 一,方法一,代码运行一次是加密,再次运行是解密,代码如下: Sub 文件的加密解密() Dim stm As New ADODB.Stream Dim str As String, i As Long Dim arr() As Byte str = ThisWorkbook.Path & "\文件" 阅读全文
posted @ 2021-11-17 22:01 Mr.LiX 阅读(450) 评论(0) 推荐(0)
摘要: 一,Open语句方式,代码如下: Sub Excel数据存入txt文件() Dim arr, brr Dim str As String, ptr As String Dim row As Integer, num As Integer arr = Range("A1").CurrentRegion 阅读全文
posted @ 2021-11-17 21:55 Mr.LiX 阅读(560) 评论(0) 推荐(0)
摘要: 一,以OLEDB连接方式导入,代码如下: Sub 导入txt数据到工作表() Dim con As New ADODB.Connection Dim res As New ADODB.Recordset Dim str As String str = ThisWorkbook.Path & "\" 阅读全文
posted @ 2021-11-17 21:48 Mr.LiX 阅读(333) 评论(0) 推荐(0)
摘要: 代码如下: 一,前期绑定: Sub 转换txt文件编码() Dim stm As New ADODB.Stream Dim str As String Dim ins As String ins = ThisWorkbook.Path & "\数据.txt" With stm .Charset = 阅读全文
posted @ 2021-11-17 21:22 Mr.LiX 阅读(922) 评论(0) 推荐(0)
摘要: 在学习VBA的ADO功能时,经常需要把Excel中的数据导入Access中;实现这样的方法有很多种: 1),使用Access的导入功能直接实现; 2),使用ADO的Recordset对象实现,不过由于Access中没有Excel中的表,需要创建表,需要设计表的结构,很繁琐。 3),使用Select查 阅读全文
posted @ 2021-11-13 20:43 Mr.LiX 阅读(1240) 评论(0) 推荐(1)
摘要: CentOS版本的Linux命令提示符默认是么有颜色,有时候看厌了,所以给它点颜色看看。 命令提示符号便令为PS1,它的帮助说明可以man bash下搜索PS1可以查看,一些功能参数,我就不介绍了,在命令行下输入: [root@web etc]#PS1="\[\033[1;32m\][\[\033[ 阅读全文
posted @ 2017-02-02 17:28 Mr.LiX 阅读(453) 评论(0) 推荐(0)
摘要: 我们先创建一个实验的目录环境,便于删除: [root@web ~]# mkdir test;cd test[root@web test]# 在此目录下创建一些实验所需的文件: [root@web test]# touch {a,b,c};touch {a,b,c}{a,b,c}{a,b,c}[roo 阅读全文
posted @ 2017-01-28 20:22 Mr.LiX 阅读(289) 评论(0) 推荐(0)
摘要: 导读:你会利用时间吗?有些人一天能做很多事,并不是比别人有更多时间,而是比别人更懂得高效利用时间,以下是有关如何高效使用时间的小建议,希望对大家有所帮助。 在朋友当中,我被认为是效率使用时间的人,因为我爬山、拍照、刷豆瓣、读书、学习、考各种证书、各种聚会,还有一份不算清闲的工作。总有人好奇问:你是怎 阅读全文
posted @ 2017-01-21 20:06 Mr.LiX 阅读(139) 评论(0) 推荐(0)
摘要: 第一层次:普通管理员 1、特征:能理解分区的概念,知道安装linux系统和常见的数据库、桌面管理器、应用软件等,能做一些基本的配置(如网络、打印机、调制解调器等),参照手边资料依葫画瓢式的安装和配置常见服务(如NFS、HTTP、FTP、TELNET、 SSH、LDAP、NIS、邮件服务、SAMBA、 阅读全文
posted @ 2016-12-26 22:04 Mr.LiX 阅读(659) 评论(0) 推荐(0)