我已经尝试了下面的脚本,但是我得到一个错误:
dim cn, rs
set cn = CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")
cn.connectionstring = "Provider=MysqlProv; Data Source=Adonis; User Id=mysqluser; Password = mysqlpass;"
cn.open
rs.open "select * from Countries", cn
每当我尝试使用vbscript连接到MySql时,我都会得到一个错误:
Script: E:\VBScript\CreateAccount.vbs
Line: 6
Char: 1
Error:[Microsoft][ODBC Driver Manager] Data source name too long
Code: 80000405
Source Microsoft OLEDB Provider for ODBC drivers
以下是打开到Mysql的连接的代码:
dim cn, rs
set cn = CreateObject("ADODB.Connection")
我有一个连接到FoxPro数据库的VBS脚本。
Dim oCN : Set oCN = CreateObject("ADODB.CONNECTION")
oCN.Open sCS
Dim oRS : Set oRS = oCN.Execute("SELECT SN_ANALSYS, SN_CRLIM, SN_CURRBAL FROM " & WScript.Arguments(0) & "_SNAME.DBF WHERE SN_ANALSYS != '' ORDER BY SN_ANALSYS ASC")
Do U
我有以下问题:-任务:有一个准备好的excel应该打开,并在打开一个宏时执行。-这个任务应该在每天的指定时间执行(比如在10:00),应该在后台执行(这样用户就不会被打扰)。 问题: 1)如果我尝试用一个.vbs文件(在任务调度器中),那么执行发生在后台,但是,一些功能丢失了(有一个与公司应用程序建立连接的excel插件,它应该从它检索一些数据->连接没有建立连接,没有接收到数据)。我猜它缺少特权或类似的东西。VBS bode是: Dim objExcel
Set objExcel=CreateObject("Excel.Application")
objExcel.A
如何通过VB脚本启动windows服务?
我试着按照下面的代码启动Mysql服务
test.vbs:
service="MySQL55"
Set wmi = GetObject("winmgmts://./root/cimv2")
qry = "SELECT * FROM Win32_Service WHERE Name='" & service & "'"
For Each s In wmi.ExecQuery(qry)
s.StartService
Next
但是这段代码没有启动mysql服务。
我正在尝试在Excel VBA中设置一个通用进程来处理连接和读取数据库。
示例应用程序有一个变量:
Dim cnDB1 As ADODB.Connection
Dim cnDB2 as ADODB.Connection
Open_Database "cnDB1", strCnnnectionDetails1
Open_Database "cnDB2", strConnectionDetails2
我已经在VBS中通过Eval和Execute命令执行了此操作,但我无法确定如何在Excel VBA中执行类似的操作。