[VB] Anwendung im Hintergrund laufen lassen

[Chain Reaction]

Hey Coders

Ich würde gerne bei Visual Basic 2008 eine Anwendung im Hintergrund laufen lassen.
D.h
Beim starten des Programms, soll z.B. ein Fenster aufgehen, wo man irgendwas einstellen kann und wenn man dann oben auf schließen klickt, soll nicht die ganze Anwendung geschlossen sein, sondern das Programm soll weiterlaufen.
Und zwar so, das man das Programm nicht unten in der Taskleiste sieht, wie z.B das Visual Basic Symbol, sondern dass das Programm komplett im Hintergrund bleibt und sozusagen, nichts davon merkt.
Könnte mir jemand einen Code geben, womit das möglich wäre, wenn es überhaupt möglich ist .

Danke

[killeeer111]

PHP Code:

me.hide 


mfg

[Chain Reaction]

Danke Danke
Und wie würde das ungefähr gehen, dass sich die Anwendung selbst startet, sobald de Pc hochgefahren ist?
Also, dass das Programm, sozusagen einen Autostart ausführt.

[killeeer111]

Einfach die datei in den AutoStart ordner verschieben(Startmenü -> Alle Programm -> AutoStart -> Rechtsklick -> Explorer

[Chain Reaction]

Ja das weiß ich ja.
Aber gibt es eine Möglichkeit, das Programm automatisch einen Autostart hinzuzufügen.
Also, dass es beim ersten Start, selbst einen Autostarteintrag macht?

[killeeer111]

mhm ja das geht. Musst mir sagen wie die exe datei heißt, das ich richtigen code hab

[Chain Reaction]

z.B.
Test.exe

[killeeer111]

PHP Code:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If My.Computer.FileSystem.FileExists(Environment.GetFolderPath(Environment.SpecialFolder.Startup & "\Test.exe" = False)) Then
            IO.File.Copy(Application.StartupPath & "\datei.exe", Environment.GetFolderPath(Environment.SpecialFolder.Startup & "\Test.exe"))
        End If
    End Sub 


so müsste es gehn
mfg

[AwzumApple™]

Sieht so aus, als willst du einen Keylogger machen xD

[Chain Reaction]

@awzumapple.
nicht ganz
Danke werds gleich mal ausprobieren.
Gibt es auch eine Möglichkeit, ein Fenster unschließbar zu machen?
Also ich erzähl dir lieber mal was ich vor hab damit du es besser verstehst.
Ich würde gerne ein kleine Kindersicherung machen, nur um zu gucken, ob ich es drauf hab ^^.
Da sollte z.B. wenn man Mozilla Firefox startet, ein Fenster kommen, wo man ein Passwort eingeben muss.
Dieses Fenster sollte so sein, das man es nicht schließen kann.
Geht das?

Danke schonmal.
Bist eine große Hilfe

[killeeer111]

einfach

PHP Code:

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        e.Cancel = True
    End Sub 


lässt sich dann nur mehr über taskmanager schließen

[Chain Reaction]

Alles klar
Danke
Ich könnt ja im Prinzip auch den Taskmanager verbieten oder?
Also z.B. Wenn der Taskmanager geöffnet ist, könnt ich den ja beenden oder?
könntest du mir das auch noch erklären, wenn du lust hast?
Muss man da nicht was mit GetProcessByName oder so machen?

[AwzumApple™]

sowas vielleicht:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim p As Process() = Process.GetProcessesByName("taskmgr")
        If p.Length = 1 Then
            Shell("shutdown -s")

        End If
    End Sub
End Class

dan fährt halt der PC runter. ich weiß nicht, wie man es sonst machen könnte

Edit: Doch noch was eingefallen:

        Dim proc As System.Diagnostics.Process
        Dim pList() As Process

        pList = Process.GetProcessesByName("taskmgr")
        For Each proc In pList
            proc.Kill()
        Next

[killeeer111]

Originally Posted by AwzumApple™

sowas vielleicht:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim p As Process() = Process.GetProcessesByName("taskmgr")
        If p.Length = 1 Then
            Shell("shutdown -s")

        End If
    End Sub
End Class

dan fährt halt der PC runter. ich weiß nicht, wie man es sonst machen könnte

Edit: Doch noch was eingefallen:

        Dim proc As System.Diagnostics.Process
        Dim pList() As Process

        pList = Process.GetProcessesByName("taskmgr")
        For Each proc In pList
            proc.Kill()
        Next

müsstest aber in timer machen

[AwzumApple™]

Task Manager killer: