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:
Cosa sbaglio?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
Ciao David

Rispondi quotando