微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

通过VB.Net应用程序运行MariaDB软件包安装

如何解决通过VB.Net应用程序运行MariaDB软件包安装

我想从VB.Net应用程序运行MariaDB安装。

首先,我想找出是否已安装MariaDB,并获取Install目录。

Registrykey中的Versionnumber是否有通配符? 目前,我得到这样的Installdirectory,但它仅适用于该版本:

Private Function GetMariaDBInstallDir() As String
Dim keyvalue As String = "Not installed"
    Try
        Dim baseKey = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine,RegistryView.Registry64)
        Dim regkey = baseKey.OpenSubKey("SOFTWARE\MariaDB 10.4 (x64)")
        If regkey IsNot nothing Then keyvalue = CStr(regkey.GetValue("INSTALLDIR"))
    Catch ex As Exception
    End Try
    Return keyvalue
 End Function

如果未安装MariaDB,我只是想像这样安装DBInterface:

Dim InstallerPath = """" & My.Application.Info.DirectoryPath + "\mariadb.msi"""
Dim p As Process = New Process()
p.StartInfo.FileName = "msiexec"
p.StartInfo.Arguments = "/i " & InstallerPath & " INSTALLDIR=C:\MyApp\subfolder\MariaDB REMOVE=ALL ADDLOCAL=DBInstance REBOOT=ReallySuppress /passive"
p.Start()
p.WaitForExit()
Path2MariaDB = "C:\MyApp\subfolder\MariaDB\"

但是这不起作用,所以第二个问题是,如何修复MariaDB安装?

最后,我想做的就是像这样为我的应用程序创建一个数据库实例:

Dim p2 As Process = New Process()
p2.StartInfo.FileName = Path2MariaDB & "bin\MysqL_install_db.exe"
p2.StartInfo.Arguments = "--datadir=c:\MyApp\mariadb --service=MyAppDB --password=" & password & " --port=" & port & " --socket=myapp --allow-remote-root-access"
p2.Start()
p2.WaitForExit()

最后一个问题是,这是为MyApplication创建新的DBInstance的正确语法吗?

谢谢:)

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。