Qt5调用VBS脚本

今天看自己的学习资料，突然发现有一个demo程序是利用Qt5调用VBS脚本的，想起之前用Qt5调用VBS脚本直接生成Excel文件了。这些小众的需求分享一下吧，可能是我从哪位大神那里弄回来的，侵权请及时告知我。话不多说，上代码：

Qt工程里面文件如下：

首先是需要调用的VBS脚本文件，这个文件要添加进Qt资源里面，VBScript.vbs：

Function ShowMyMsgVb(msg)

    MsgBox(msg)

End Function

Function fun()

    MsgBox("111")

End Function
           

vbs脚本里面一个是带参数的函数，一个是不带参数的函数。

ui界面如下：

mainwindow.cpp代码如下：

#include "mainwindow.h"
#include "ui_mainwindow.h"

MainWindow::MainWindow(QWidget *parent) :
    QMainWindow(parent),
    ui(new Ui::MainWindow)
{
    ui->setupUi(this);
    if(!initVBScripts())
    {
        QMessageBox::critical(this, "Error", "Script not loaded!");
        return;
    }
}

MainWindow::~MainWindow()
{
    delete ui;
}

void MainWindow::on_hello_btn_pressed()
{
   main_scrpt->call("ShowMyMsgVb(QString)", ui->msg_edit->text());
   //main_scrpt->call("fun()");
}

bool MainWindow::initVBScripts()
{
    scrpt_mgr = new QAxScriptManager(this);
    main_scrpt = scrpt_mgr->load(":/VBScript.vbs", "MyScript");
    if(!main_scrpt)
        return false;
    return true;
}
           

mainwindow.h代码如下：

#ifndef MAINWINDOW_H
#define MAINWINDOW_H

#include <QMainWindow>

#include <QtWidgets>
#include <ActiveQt>

namespace Ui
{
    class MainWindow;
}

class MainWindow : public QMainWindow
{
        Q_OBJECT

    public:
        explicit MainWindow(QWidget *parent = 0);
        ~MainWindow();

        bool initVBScripts();

    private slots:
        void on_hello_btn_pressed();

    private:
        Ui::MainWindow *ui;

        QAxScriptManager *scrpt_mgr;
        QAxScript *main_scrpt;
};

#endif // MAINWINDOW_H
           

main.cpp代码如下：

#include "mainwindow.h"
#include <QApplication>

int main(int argc, char *argv[])
{
    QApplication a(argc, argv);
    MainWindow w;
    w.show();

    return a.exec();
}
           

pro文件内容如下：

#-------------------------------------------------
#
# Project created by QtCreator 2015-11-17T14:18:49
#
#-------------------------------------------------

QT       += core gui axcontainer

greaterThan(QT_MAJOR_VERSION, 4): QT += widgets

TARGET = QtVbscriptExample
TEMPLATE = app


SOURCES += main.cpp\
        mainwindow.cpp

HEADERS  += mainwindow.h

FORMS    += mainwindow.ui

RESOURCES += \
    resources.qrc
           

运行结果见下图：