Let user run script in VB Apllication

I wish to allow a user to execute a small VBScript that they write within my app. I though i could get what i want vai the Windows Scripting Host but am unable to achive my aims. can any one help.

Thanks
:huh: :huh:

See the Microsoft Script Control component.

Example usage:

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

Thanks alot mate that is great, just what i wanted!!
:D :D :D :D