how to execute a VBScript file from a VB6 subroutine?

• • Reply

  14 years ago

  by dgr7

  David Robinson

  , United States

  Joined 14 years ago
  Hello,
  I was wondering if anyone could share with me the VB6 code that would execute a VBScript file named
  test.vbs
  in the subdirectory
  D:\test\
  thanks in advance,
  david
  
  
  
  
  
  
  Report abuse
• • Reply

  14 years ago

  by Kassem

  Kassem Baalbaki

  Riyadh, Saudi Arabia

  Joined 14 years ago

  Hi,

  Check this:

  'DECLERATIONS TO RUN FILES
  
  
  
  Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

  '--------------------------------------------

  Private Sub Command1_Click()

      ShellExecute 0&, vbNullString, "D:\test\test.vbs", vbNullString, vbNullString, vbNormalFocus
  
  End Sub
  
  

   

  Hope this works fine with you

  Report abuse
• • Reply

  13 years ago

  by dmb_job

  Baechle, James

  , United States

  Joined 13 years ago

  Another solution for those who are searching for a similar solution for a Web Browser application.

  http://www.developmentfusion.co.uk/forums/thresd/63473/

  "Good software like good food takes time to prepare"

  Winnie-the-Pough

   

   

  Report abuse