I have a custom action that is to be run when system is being modified,
Something does not work in it that I need to debug. To do it, I have placed some MsgBox instructions but they don't work. Nothing is shown.
How can I show the message boxes?
By the way, this is the actual VBSript code. I need to pass [SqlTrustedConnection] property but I need to know how it is received.
Code: Select all
Function main()
data = Split(Session.property("CustomActionData"), ";")
path = data(0)
server = data(1)
username = data(2)
password = data(3)
trusted = data(4)
If Right(path, 1) = "\" Then
path = Left(path, Len(path) - 1)
End If
filePathConfiguracion = path & "\Configuracion.exe.config"
filePathGestion = path & "\Gestion.exe.config"
filePathRegistro = path & "\Registro.exe.config"
oldDBString = "data source=[SERVER];user id=[USERNAME];password=[PASSWORD];"
MsgBox data
MsgBox trusted
If trusted = "1" Then
newDBString = "data source=" & server & ";integrated security=True;;"
Else
newDBString = "data source=" & server & ";user id=" & username & ";password=" & password & ";"
End If
ReplaceInFile filePathConfiguracion, oldDBString, newDBString
ReplaceInFile filePathGestion, oldDBString, newDBString
ReplaceInFile filePathRegistro, oldDBString, newDBString
main = 1
End function
Jaime