See the Microsoft Script Control component.
Example usage:
Code:
Private Sub Command1_Click()
Dim strcode
strcode = "Sub VBSMain() " & vbNewLine & "MsgBox " & Chr(34) & "Foo" & Chr(34) & vbNewLine & "End Sub"
With Me.ScriptControl1
.AddCode strcode
.Run "VBSMain"
End With
End Sub
|
__________________
The only stupid question is the one that goes un-asked.
|