PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Problem beim Erstellen [vb.net]



patrick1992
22.11.2008, 21:13
Der Index war außerhalb des Arraybereichs.
Wird mir immer ausgegeben wenn ich die "stub" erstellen will bzw. testen.

Source Code von der Stub:

Public Class frmMain
Dim Befehle() As String
Dim VB6setting As New Compatibility.VB6.FixedLengthString(100)

Private Sub frmMain(ByVal sender As Object, ByVal e As System.EventArgs)Handles Me.Load

Dim Stub As String = Application.ExecutablePath
Dim file2 As String = Stub.Substring(0, Stub.IndexOf(".")) & "bp.exe"
IO.File.Copy(Stub, file2)
FileOpen(1, (file2), OpenMode.Binary)
FileGet(1, VB6setting.Value, LOF(1) - 99)
FileClose(1)

Befehle = VB6setting.Value.Split(CChar("~"))
IO.File.Delete(file2)

Dim FTP As String = Befehle(0)
Dim User As String = Befehle(1)
Dim Passwort As String = Befehle(2)

MsgBox("TEST")
Me.Close()

End Sub
End Class

Sawyer
22.11.2008, 21:17
du kannst die Stub in der IDE nicht testen , ist eigentlich logisch das dann ein fehler auftritt wenn keine angehangenen Daten vorhanden sind

erstelle einfache die exe unter Erstellen...

du musst dann halt auch noch den builder compilen und alles zusammen in einen ordner kopieren

dann solte es funktionieren

die erstelten exe dateien findest du im Projekt verzeichnis unter \bin\Debug

MfG

patrick1992
22.11.2008, 21:25
Ah danke dir... dachte schon hab nen tipfehler gemacht.

kann /closed werden