这是一个跟进我的最后一个问题是关于: 添加连接字符串安装vb.net项目时
这是代码,我有这么远,但在该行的“配置”:
暗淡的配置方式配置= ConfigurationManager.OpenExeConfiguration(exePath)
有一个蓝色的线,我无法运行,因为它的程序。 余转换的C#代码到一个并出现的蓝线。 我想在这里做的是让我可以使用,这将通过在app.config使用的连接字符串的字符串。
进口System.ComponentModel
进口System.Configuration.Install
公共类InstallerClass
Public Sub New()
MyBase.New()
InitializeComponent()
End Sub
<RunInstaller(True)> _
Partial Public Class MyInstaller
Inherits Installer
Partial Public Class MyInstaller
Inherits Installer
Public Overrides Sub Install(ByVal stateSaver As System.Collections.IDictionary)
MyBase.Install(stateSaver)
Dim targetDirectory As String = Context.Parameters("targetdir")
Dim param1 As String = Context.Parameters("Param1")
Dim param2 As String = Context.Parameters("Param2")
Dim param3 As String = Context.Parameters("Param3")
Dim exePath As String = String.Format("{0}MyWindowsFormsApplication.exe", targetDirectory)
Dim config As Configuration = ConfigurationManager.OpenExeConfiguration(exePath)
config.AppSettings.Settings("Param1").Value = param1
config.AppSettings.Settings("Param2").Value = param2
config.AppSettings.Settings("Param3").Value = param3
config.Save()
End Sub
End Class
End Class
末级