Premetto che sono alle prime armi
Ho bisogno di aiuto: vorrei che, al click di un pulsante (in questo caso il button10) il file "res.zip" contenuto in una determinata cartella venga estratto in un' altra cartella. Ho usato il codice che ho incollato qua sopra, ma alla pressione del button10 mi dā questo errore: "riferimento a un oggetto non impostato su un istanza di oggetto". Cosa devo fare?codice:Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click Try Dim sc As New Shell32.Shell() IO.Directory.CreateDirectory(".\TPM\data\") Dim output As Shell32.Folder = sc.NameSpace(".\TPM\texturepack\") Dim input As Shell32.Folder = sc.NameSpace(".\TPM\download\" & ListBox1.SelectedItem & "\res.zip") output.CopyHere(input.Items, 4) Catch ex As Exception If My.Settings.language = "ita" Then MsgBox("Qualcosa č andato storto.", MsgBoxStyle.Critical + MsgBoxStyle.OkOnly, "Ops!") Else MsgBox("Something went wrong.", MsgBoxStyle.Critical + MsgBoxStyle.OkOnly, "Ops!") End If End Try End Sub

Rispondi quotando