ICode9

精准搜索请尝试: 精确搜索
  • VBA 生成文件 xml,xlsx2022-08-02 10:31:39

    VBA 生成文件方法: 使用 ADODB.Stream 生成文件,通过控制文件的后缀,应该是什么文件都可以生成。 Dim WriteStream2 As Object  '定义一个对象 Set WriteStream2 = CreateObject("ADODB.Stream")   '创建一个 ADODB.Stream 对象 With WriteStream2  .Type = 2 'adTypeText  '点

  • 【Excel】VBA编程 02 访问MySQL数据库2022-02-27 20:33:24

      1、配置Windows连接驱动ODBC 因为是访问MySQL,则对应的ODBC驱动由MySQL厂商发布 https://dev.mysql.com/downloads/connector/odbc/   这里系统位数有个坑,要下载32位版 安装64位版后执行VBA脚本却告诉我找不到ODBC驱动,想半天才知道系统位数原因 https://yebd1h.smartapps.c

  • VB,VBS,VBA,ASP可引用的库参考2022-02-02 15:31:39

    文件系统对象相关: ("SCRIPTING.FILESYSTEMOBJECT") 字典相关: ("SCRIPTING.DICTIONARY") 脚本外壳相关: ("WSCRIPT.SHELL") WINDOWS外壳相关: ("SHELL.APPLICATION") 正则表达式相关: ("VBSCRIPT.REGEXP") ASP相关: ("MSWC.ADROTATOR") ("

  • C# (CSharp) ADODB.Command示例2022-01-09 17:31:56

    示例一 ///<summary> /// Execute a stocked procedure. /// <param name="schema"> /// <see cref="SharpQuery.SchemaClass">SchemaClass</see> object. /// </param> /// <param name="rows"> /// Maximum

  • U8 V13.0小白入门开发记录二-------------------创建WebAPI项目2022-01-08 11:01:06

    我选择的开发模式是MVC的方式进行开发,搭建好工程。在相应的工程模块引用开发U8 V13.0版本对应的dll文件。 1.引用共通的ADODB.dll,这个文件需要注意的是,引用的Path="U8安装路径/Interop/ADODB.dll",这个需要特别注意,用其他版本或VS自带的都不行,这个经测试,可以使用。 2.引用对应开发

  • vb6.0连接postgresql 132021-04-15 21:00:15

    遇到的问题记录一下。 1.首先是安装pgssql,我安装的是13版本的。 2.安装完成之后,安装navicat工具,便于查询,数据库到这边就装完了, 3.还原之前的数据库。。。 4.下载odbc驱动 https://www.postgresql.org/ftp/odbc/versions/msi/ 直接安装即可。 5.打开 控制面板–>管理工具–>O

  • 搬家第41天-citect2018citectVBA编程将ACCESS数据采集到microsoftdatagrid控件显示2021-03-10 20:34:11

    以前在citect 7.x版本试验过将ACCESS数据采集到microsoft 数据表控件显示,但是当时是将查询结果记录集逐条按照字段位置和数值写入控件,效率低,尤其是数据表记录很多的时候,显得很慢。其实可以通过设定控件的datasource属性方法快速的显示数据。 在citect项目中写以下citectVBA代码 Su

  • 搬家第一天-2.WinccV7.3 使用VBS判断数据库Mydatabase是否存在2021-01-29 08:35:20

    从某浪开始搬家,第二篇 使用wincc时,如果需要判断附带的sql server是否有某个数据库,可以使用下面的代码,实际上这个应该属于IT行业的内容。 Sub OnClick(ByVal Item)          Dim ors,conn,con,ssql,ocomDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="

  • 搬家第一天-5.WinccV7.3 使用VBS创建数据表mytable5.WinccV7.3 使用VBS创建数据表mytable2021-01-29 08:33:54

    Sub OnClick(ByVal Item)            Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ssql2,ocom2Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="Provider = SQLOLEDB.1;password = sa

  • 搬家第一天-1.WinccV7.3 使用VBS判断数据库Mydatabase下是否存在数据表Mytable2021-01-29 08:01:02

    从今天开始搬运某浪上以前写的内容 Sub OnClick(Byval Item)                          Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readc

  • 用CreateObject 函数创建某个对象时,先查找到其对应的class 。以下是常见的class2020-05-05 12:56:10

    https://wenku.baidu.com/view/926a5e1ba8956bec0975e3e8.html createobject("vbscript.regexp") '正则表达式 createobject("scripting.dictionary") '字典 createobject("adodb.recordset")   '数据库记录操作 createobject("scripting

  • [asp数据库同步]ASP连接各种数据库的方法2020-04-21 15:03:44

      ASP连接Access数据库(DSN-less连接方法):  set adocon=Server.Createobject(“adodb.connection”)  adoconn.Open”Driver={Microsoft Access Driver(*.mdb)};DBQ=”&_Server.MapPath(“数据库所在路径”)  ASP连接Access数据库( OLE DB连接方法):  set adocon=Server.Cre

  • [Visual Basic]VB连接数据库2020-03-23 18:57:51

    Dim i As Integer, a(1 To 50) As String Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset conn.ConnectionString = "provider=microsoft.ACE.oledb.12.0;data source=" + App.Path + "\xx.accdb" conn.Open Set rs.ActiveConnectio

  • EXCEL VBA计算带汉字的字符串的MD5值(VBA转UTF-8保存)2020-02-25 14:55:29

    操作思路:1.使用 ADODB.stream 把字符串转换为UFT-8的编码集存储到文件 AA2.使用调用windows命令行CertUtil -hashfile c:\11\AA md5 对文件计算MD5值3.回显结果直接输出到EXCEL4.字符串截取第二行,去空格,输出MD5值 VBA代码: strBody = "VBA变量字符串转换为UFT-8后MD5加密" 'MD5计算D

  • php-类:ADORecordSet_mysql获取按行ID索引的数组的简便方法2019-12-09 23:41:16

    我有一个带有名为“ id”的主键的表,并且正在使用ADODB并获取ADORecordSet_mysql.我需要一个数组,其中id与结果集中的一行相关联,但是ADODBRecordSet_mysql似乎只具有GetArray(int startingRow)方法,该方法返回由startingRow索引的数组(默认为0). 我不想遍历此结果集自己将id与每一

  • mysql-检查经典ASP中的连接是否正常2019-11-19 16:16:32

    有没有一种简单的方法来检查连接字符串是否成功连接到指定的数据库: 场景: 连接字符串示例: ConnString="DRIVER={MySQL ODBC 5.1 Driver}; SERVER=###.###.####.##; PORT=3306; DATABASE=DbName; USER=DbUser; PASSWORD=DbUser_Pswrd; OPTION=3;" 如果上述操作失败(例如,由于MySQL

  • php – ADOdb中的SQL注入和一般网站安全性2019-09-15 16:38:48

    我已经做了很多阅读,但仍然不理解100%SQL注入的发生方式! 我想从那些知道基于我的例子的SQL注入的具体例子中看到它,因此它可以被复制,测试和修复.我试过SQL注入我的代码而不能,所以我希望有人来证明我的意思! 1.我认为SQL注入只能通过POST或GET方法进行,这意味着在网站上它应该是帖子

  • .net连接数据库语法2019-08-10 16:01:30

    原文链接:http://www.cnblogs.com/chunfeng/archive/2010/11/11/1874993.html 连接数据库语法总结 1.连接Access数据库 //连接字符串 // mdbFileName是Access数据库文件的名称并放在debulg目录下 string MyConnCommand = @"Provider=Microsoft.Jet.OLED

  • php – 在另一个类中使用包含的类2019-07-16 23:29:49

    我正在尝试使用数据库类(ADOdb for PHP),但我不知道如何在另一个类中使用它.例: <?php include_once("adodb.inc.php"); $conn = NewADOConnection('mysql'); class Contacts { public function getData(){ $conn->Connect(...); //do something } }

  • php – 我如何处理mysql表中的并发插入并获取正确的插入ID2019-07-16 00:29:06

    我正在使用adodb for PHP库. 为了获取插入记录的id,我使用此函数 "$db->Insert_ID()" 我想知道是否有多个同时插入数据库表,这个方法会为每个插入的记录返回正确的插入ID吗? 我问这个的原因是因为我使用这个最后一个插入id来进一步处理其他记录并在相关表中进行后续输入. 这种方法是

  • mysql – sql join on string = integer,适用于任何RDBMS2019-07-08 13:14:08

    我需要在列上连接两个表,在一个表中定义为字符串,在另一个表中定义为整数.在两列中,存储的实际数据是整数.这是通过设计给我的 – 我无法改变这一点. 所以当我加入MySQL时很好 – 它会默默地进行转换. PostgreSQL抱怨道.有CAST运算符,我可以添加到查询中将字符串转换为整数,但CAST

  • Javascript调用本地数据库2019-07-05 12:04:22

    (1)new ActiveXObject("ADODB.Connection");   <HTML>     <HEAD>  <TITLE></TITLE>     <script language=javascript>     function connectDb()     {     var ConnDB = new ActiveXObject("ADODB.Connection");     Co

  • 如何在PHP ADODB中回滚事务2019-06-24 18:02:04

    我正在尝试在php(mysql-driver)中使用ADODB进行数据库事务, 虽然由于某种原因我无法使交易有效.目前代码看起来有点像这样(为简化顺序而简化) // Start DB-connection $db = NEWADOConnection('mysql'); $db->debug = false; $db->disableBlobs = false; $db->PConnect($host, $lo

  • php – 这样安全吗? ADOdb准备好的声明2019-06-14 01:18:15

    我正在使用ADOdb连接到我的MSSQL数据库.我想知道这是否足以阻止SQL注入? 我正在使用的准备好的查询是: $db = ADONewConnection('odbc_mssql'); $dsn = "Driver={SQL Server};Server=SERVNAME;Database=DBNAME;"; $ADODB_COUNTRECS = false; $db->Conn

  • VB类对象序列化与反序列化2019-03-17 10:50:24

    '序列化类对象为二进制流 Public Function ObjectToBinary(ByVal KeyName As String, Obj As Object) As Byte() Dim Byt() As Byte Dim objBag As New PropertyBag If Obj Is Nothing Or Len(KeyName) = 0 Then Exit Function objBag.WriteProperty KeyName,

专注分享技术,共同学习,共同进步。侵权联系[81616952@qq.com]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有