摘要：
前提条件 如果没有安装office的话，需要安装引擎 安装了office就不用安装引擎 连接数据库 Dim plMydb As Microsoft.Office.Interop.Access.Dao.DatabaseplMydb = DAODBEngine_definst.OpenDatabase( 阅读全文
摘要：
Debug 和 Release 的区别 Debug 通常称为调试版本，它包含调试信息，并且不作任何优化，便于程序员调试程序。Release 称为发布版本，它往往是进行了各种优化，使得程序在代码大小和运行速度上都是最优的，以便用户很好地使用。 Debug 和 Release 的真正区别，在于一组编译选 阅读全文
摘要：
cmd命令 ①services iptables status 查看 iptables的状态 ：unrecognized service 表示尚未安装 ②find -name iptables 查找iptables 文件 ③firewall-cmd --state 查看firewall状态 ④reb 阅读全文
摘要：
Public Sub HardCopy() Dim vlIndex As Integer '/ インデックス Dim vlClipboard As IDataObje... 阅读全文
摘要：
plFso = CreateObject("Scripting.FileSystemObject") ' ' '/ 世代管理 plRoot = plFso.GetFolder(plTarbkFld) plCurCn... 阅读全文
摘要：
BuildPath()生成一个文件路径CopyFile() 复制文件CopyFolder() 复制目录CreateFolder() 创建新目录CreateTextFile() 生成一个文件DeleteFile() 删除一个文件DeleteFolder() 删除一个目录DriveExists() 检验... 阅读全文
摘要：
'/----------------------------------------------------------------------------------------------'/ 処理名 ：データベースオープン'/'/ 機能 ：データベースをオープンする'/'/ 引数 ：ioHan... 阅读全文
摘要：
'/---------------------------------------------------------------------------------------------- '/ 処理名 ：フィールドデータ取得 '/ '/ 機能 ：フィールドの内容... 阅读全文
摘要：
Dim Report As New crProgressList Report.PrintOptions.PaperSize = CrystalDecisions.Shared.PaperSize.PaperA4 Report.SetDatabaseLogon(strUser, strPasswo... 阅读全文
摘要：
テキストを読込Dim plFileNo As ShortDim plBuf As ObjectIf hFso.FileExists(plTmpTxt) = True ThenplFileNo = FreeFile()FileOpen(plFileNo, plTmpTxt, OpenMode.Inpu... 阅读全文