I've seen it somewhere before;
You can execute a line of VB code from a string somehow...
Like: VBExecute("msgbox 'This is a user generated dialog'")
Printable View
I've seen it somewhere before;
You can execute a line of VB code from a string somehow...
Like: VBExecute("msgbox 'This is a user generated dialog'")
yeah i've seen someone put that code on the forums ... i'm pretty sure it was a guru or someone with at least 2000 posts ... so u should do a search for guru people
Use the Microsoft Scripting Host. It comes with an activex control that you can use in vb. I don't remember how to use it, but it's something like controlname.execute.
Away with scipting.. Try this:
Enjoy!Code:Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long
' = = = = For VB5
'Declare Function EbExecuteLine Lib "vba5.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long
' = = = = For Access 97/VBE.dll clients as Word 97 and Excel 97
'Declare Function EbExecuteLine Lib "vba332.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long
Function FExecuteCode(stCode As String, Optional fCheckOnly As Boolean) As Boolean
FExecuteCode = EbExecuteLine(StrPtr(stCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function
Private Sub Form_Load()
Dim TheString As String
TheString = "MsgBox ""This is a user generated dialog"""
Debug.Print FExecuteCode(TheString, False)
End Sub