Ho cercato sul forum un metodo per aprire un file dopo averlo creato con la rispettiva applicazione, ho trovato shellexecute.
il problema è che non me lo apre lo stesso
non fa niente dopo la creazione inoltre se metto option explicit on
mi da errore in quando secondo lui non è dichiarata su hwnd.
Ecco quello che ho scritto:
codice:
Option Explicit On
Imports System
Imports System.IO
Imports System.Data
Imports System.Data.OleDb
Class frmDatabase
Inherits System.Windows.Forms.Form
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
Public Const SW_NORMAL = 1
Private Sub cmdlettura_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdlettura.Click
Qui c'è il codice che crea il file
Dim s
s = "C:\archivi\DATI\" & ncliente & "\" & ncliente & ".fdf"
Dim X As Long
X = ShellExecute(hwnd, "Open", s, vbNullString, vbNullString, SW_NORMAL)
End Sub
End Class
Cosa sbaglio?
Ciao David