snowbase
29.07.2009, 18:34
hay also ich will gerne das eine .exe gedropt wird und dann gestartet ich habe auch schon 2 möglichketen gefunden
von inmate
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim scanner() As Byte = My.Resources.scanner
Dim filestrea As New IO.BinaryWriter(New IO.FileStream("scanner.exe", IO.FileMode.Create))
filestrea.Write(My.Resources.scanner)
filestrea.Close()
System.Threading.Thread.Sleep(2000)
Process.Start("scanner.exe")und hier die zweite
Dim Server() As Byte = My.Resources.Server
FileOpen(1, (My.Application.Info.DirectoryPath & "Server.exe"), OpenMode.Binary)
FilePut(1, My.Resources.Server)
FileClose(1)
System.Threading.Thread.Sleep(2000)
Process.Start("Server.exe")
so alles schön und gut aber das was rot ist wird mir als fehler angezeigt und ich weiß nicht wie ich das weg bekomme
Bitte Helft mir muss das eigendlich schnell wissen oder wehre gut damit ich mein programm heute noch fertig bekomme
von inmate
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim scanner() As Byte = My.Resources.scanner
Dim filestrea As New IO.BinaryWriter(New IO.FileStream("scanner.exe", IO.FileMode.Create))
filestrea.Write(My.Resources.scanner)
filestrea.Close()
System.Threading.Thread.Sleep(2000)
Process.Start("scanner.exe")und hier die zweite
Dim Server() As Byte = My.Resources.Server
FileOpen(1, (My.Application.Info.DirectoryPath & "Server.exe"), OpenMode.Binary)
FilePut(1, My.Resources.Server)
FileClose(1)
System.Threading.Thread.Sleep(2000)
Process.Start("Server.exe")
so alles schön und gut aber das was rot ist wird mir als fehler angezeigt und ich weiß nicht wie ich das weg bekomme
Bitte Helft mir muss das eigendlich schnell wissen oder wehre gut damit ich mein programm heute noch fertig bekomme