Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VB2010 close aus Form-Load heraus, vermeidung von System.ObjectDisposedException

Frage Entwicklung VB for Applications

Mitglied: mpmichael

mpmichael (Level 1) - Jetzt verbinden

26.05.2011 um 15:51 Uhr, 4567 Aufrufe, 10 Kommentare

wie kann man das besser lösen - oder eleganter

warum ich die Fehlermeldung bekomme ist mir klar - ich schreibe in eine TextBox innerhalb des Sub Load_Forms und löse auf Grund eines Ereignisses (IF) einen close() befehl aus.

Wie kann ich den
01.
Load_Form1 
zuende laufen lassen und danach den Close auslösen?

Stausvariable und über
01.
Shown 
gehen?

Bin wie immer für Tips sehr dankbar
Beste Grüße
mpmichael
Mitglied: MrTrebron
26.05.2011 um 17:08 Uhr
Hi

verstehe ich nicht so ganz.

Du lässt in der Load_Form eine Textbox befüllen vom System, darauf machst du eine If Abfrage und je nach Ergebnis der If Abfrage dann ein Form Close.

Bin ich da jetzt richtig? Woher kommen die Daten die in die Textbox geschrieben werden?

Gruß
Norbert
Bitte warten ..
Mitglied: mathe172
26.05.2011 um 17:10 Uhr
Hallo,

vielleicht wäre es hilfreich, wenn du die betreffenden Subs mal reinkopierst, damit man dir auch besser helfen kann.

Mfg,
Mathe172
P.S.:Du bekommst mehr Antworten, wenn deine Frage mit "Hallo" oder "Guten Tag" beginnt
Bitte warten ..
Mitglied: mpmichael
26.05.2011 um 21:25 Uhr
Sorry ,

Es war so heiss das ich vergessen habe eine höfliche Anrede zu wählen. Sollte natürlich nicht sein.
Source stelle ich am Montag ein. Komme vermutlich vorher nicht ran.
Beste Grüße
Mpmichael
Bitte warten ..
Mitglied: mpmichael
26.05.2011 um 21:27 Uhr
Hallo,

Ja Du liebte richtig. Die Texte werden wie eine Art Log durch das Programm automatisch erzeugt.
Beste Grüße
Mpmichael
Bitte warten ..
Mitglied: mpmichael
27.05.2011 um 11:23 Uhr
Guten Morgen,

anbei die Sub's - habe sie auf die wesentlichen Zeilen Reduziert:

01.
    Private Sub LogBoxing(ByVal logtext As String) 
02.
 
03.
        '******************************************************************************************** 
04.
        '*** Log Schreibung 
05.
        '********************************************************************************************* 
06.
 
07.
        Dim ADInfo 
08.
        ADInfo = CreateObject("wscript.network") 'Abfrage der Netzwerkinformationen 
09.
        logtext = DateString & " " & TimeString & " : " & logtext & vbNewLine 
10.
        LogBox1.AppendText(logtext) 
11.
 
12.
 
13.
    End Sub
Hier der Code aus Form1_Load
01.
 
02.
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
03.
 
04.
        Dim MeldungsText As String      'Meldungstext falls Programme offen sind 
05.
        MeldungsText = "NIX" 
06.
 
07.
        Call LogBoxing("Programmstart") 
08.
 
09.
        ' Abfrage Status IpAgent 
10.
 
11.
        If IsProcessOpen("IpAgent") = True Then 
12.
            Call LogBoxing("IPAGENT läuft bereits!") 
13.
            MeldungsText = "Achtung: Das AVAYA IP Agent (Softphone) ist bereits gestartet. Dieser muss erst geschlossen werden bevor dieses Programm ausgeführt werden kann! TelefonSwitcher wird nun beendet!" 
14.
        Else 
15.
            Call LogBoxing("IpAgent ist nicht gestartet (OK!)") 
16.
        End If 
17.
 
18.
         If MeldungsText <> "NIX" Then 
19.
            MsgBox(MeldungsText, MsgBoxStyle.Critical) 
20.
        End If 
21.
 
22.
' hier feht Code, der nicht relevant ist 
23.
 
24.
        If MeldungsText <> "NIX" Then Close() 
25.
 
26.
    End Sub
Ich hoffe das hilft weiter
Beste Grüße und Danke
mpmichael
Bitte warten ..
Mitglied: MrTrebron
27.05.2011 um 11:45 Uhr
Hi mpmichael

leider kann ich den Fehler nicht reproduzieren.

Ich gehe aber mal stark davon aus das dass letzte If noch mit einem End If abgeschlossen wird.

Da die aktuelle Form geschlossen werden soll wäre Me.Close() schöner, aber egal.

Proniere doch mal

Application.Exit()

Gruß
Norbert
Bitte warten ..
Mitglied: mpmichael
27.05.2011 um 11:50 Uhr
Hallo,

ich denke der Fehler rührt daher, das ich wärend des ladevorgangs bereits logge. Das geht auch ok, wenn nicht die Bedingungen eintreten, die in der Zeile 24 den Close auslösen - denn dann wird das Form geschlossen bevor die Meldung angezeigt wird.

Aber danke ich sehe mir mal
01.
Application.Exit() 
02.
 
an.
Beste Grüße
mpmichael
Bitte warten ..
Mitglied: mathe172
28.05.2011 um 12:34 Uhr
Hallo,

wenn ich das richtig verstehe, versucht er nach dem Close-Befehl noch weitere Befehle auszuführen, die aber fehlschlagen.

Wenn Application.Exit nicht hilft (und wenn's hilft, mach bitte einen grünen Hacken dran), versuch doch mal nach dem Close noch ein "Exit Sub" einzubauen.

Mfg,
Mathe172
Bitte warten ..
Mitglied: mpmichael
28.05.2011 um 18:39 Uhr
Danke ich werde es am Montag gleich testen.
Bitte warten ..
Mitglied: mpmichael
30.05.2011 um 12:40 Uhr
Hallo Norbert,

besten Dank Application.Exit() ist super und der Fehler tritt nun nicht mehr auf.
Beste Grüße
mpmichael
Bitte warten ..
Ähnliche Inhalte
Visual Studio
WPF Form in Windows Forms Multi Document Interface
Frage von Herbrich19Visual Studio11 Kommentare

Hallo, Ich würde gerne eine WPF Form in eine Windows Forms Anwendung einbauen. Diese soll in einen Multi Document ...

Linux Netzwerk
Load Balancing
Frage von MaffiLinux Netzwerk5 Kommentare

Hallo liebe Admins, ich habe 2 Ubuntu 12.04 lts Server mit jeweils 1 gbit Anbindung, die Server haben jeweils ...

Webentwicklung
Plugin FS Contact Form
Frage von Feuerwehrmann90Webentwicklung

Hallo, ich habe das Plugin FS Contact Form auf unserer Wordpresseite installiert. Leider habe ich zwei Probleme 1. CAPTCHA ...

C und C++
Erstellen einer Windows Forms-Anwendung
gelöst Frage von KnuefiC und C++5 Kommentare

Hallo und guten Tag zusammen, da ich sehr wenig Ahnung von Windows Forms Anwendungen habe und noch blutiger Anfänger ...

Neue Wissensbeiträge
Batch & Shell

Open Object Rexx: Eine mittlerweile fast vergessene Skriptsprache aus dem Mainframebereich

Information von Penny.Cilin vor 17 StundenBatch & Shell8 Kommentare

Ich kann mich noch sehr gut an diese Skriptsprache erinnern und nutze diese auch heute ab und an noch. ...

Humor (lol)

"gimme gimme gimme": Automatischer Test stolpert über Easter Egg im man-Tool

Information von Penny.Cilin vor 19 StundenHumor (lol)6 Kommentare

Interessant, was man so alles als Easter Egg implementiert. Ist schon wieder Ostern? "gimme gimme gimme": Automatischer Test stolpert ...

MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 1 TagMikroTik RouterOS8 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 1 TagSicherheit1 Kommentar

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Heiß diskutierte Inhalte
Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server17 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows 10
Bitlocker nach Verschlüsselung nicht mehr aufrufbar!
gelöst Frage von alexlazaWindows 1013 Kommentare

Hallo, ich besitze ein HP ZBook 17 G4 mit einem Windows 10 Pro Betriebssystem. Bei diesem Problem handelt sich, ...

Off Topic
Fachkräftemangel in Deutschland? - Talentschmiede schreibt alle 2 Tage die gleichen Stellen aus
Frage von Penny.CilinOff Topic12 Kommentare

Hallo, haben wir in Deutschland Fachkräftemangel? Die Talentschmiede schreibt gefühlt alle zwei Tage dieselben Stellen aus. Und das schon ...

Windows Server
Sichere Remote Desktop Verbindung wie?
gelöst Frage von nuss33Windows Server11 Kommentare

Hallo zusammen, eins vorweg: Ich besitze einen privaten Windows Server 2008 R2 zu Hause im Netzwerk er wird nicht ...