Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Nach der Installation ein clickevent machen

Frage Entwicklung VB for Applications

Mitglied: Andiy

Andiy (Level 1) - Jetzt verbinden

31.08.2006, aktualisiert 01.09.2006, 3054 Aufrufe, 2 Kommentare

Moin moin

Ich würde gerne, dass eine Textdatei mit dem installationsverzeichnes des Programmes in dem Programmordner speichern und hab mir dazu ein kleines konsolenprogramm geschrieben. (VBS darf ich nicht benutzten) Das Programm funktioniert auch wenn ich es allein laufen lassen. Jetzt muss ich nur über ein Click-Event das Programm ansteuern, und zwar wenn du installation abgeschlossen ist, also wenn man den installer verlässt. Irgendwie bekomm ich das nicht hin. Ich hab es schon versucht mit dem Benutzerdefinierten Aktionen,was aber auch nicht funktioniert hatte. Die Konsole ging zwar auf, hat aber meine.txt nicht geschrieben. Wenn ich nach der installation die exe manuell ausführe funktioniert das.
Mitglied: gijoe
31.08.2006 um 21:01 Uhr
was darfst du denn Benutzen? Könntest du das script mal posten? Vielleicht hilft schon eine kleine 'sleep' funktion, die sich ohne weiteres in einer shell integrieren lässt.
Bitte warten ..
Mitglied: Andiy
01.09.2006 um 08:00 Uhr
Also ich Programm 1 (Setup) und Programm 2 (Konsolenprogramm)

Ich will Programm 1 installieren was auch funktioniert. Ich hab dann versucht in der Installation, bzw kurz danach, das Programm 2 auszuführen welches mir eine txt-Datei mit dem installationspfad angeben soll. Hier der Code für das "Konsolenprogramm":

Imports System.Net
Imports Microsoft.Win32
Imports System.IO
Imports System.Drawing.Printing.PrintDocument

Public Class Form1

Inherits System.Windows.Forms.Form

#Region " Vom Windows Form Designer generierter Code "

Public Sub New()
MyBase.New()

' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()

' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen

End Sub

' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer

'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Button1 As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Button1 = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(264, 280)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(176, 112)
Me.Button1.TabIndex = 0
Me.Button1.Text = "Button1"
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(544, 573)
Me.Controls.Add(Me.Button1)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)

End Sub

#End Region

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

Private Sub Pfad()
Dim pfad, pcname, test As String


pcname = Environment.MachineName
pfad = Environment.CurrentDirectory & "\Loc.txt"
test = "\\" & pcname & "\" & pfad
' MsgBox(pfad & vbNewLine & pcname & vbNewLine & test)
Dim writer As FileStream = New FileStream(pfad, FileMode.Create)
Dim StrWr As StreamWriter = New StreamWriter(writer)
StrWr.WriteLine(test)
StrWr.Close()


Application.Exit()
End Sub

Private Sub txtschreiben()


End Sub
End Class
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Windows Installation
Server 2016 UEFI Installation von USB (3)

Tipp von DerWoWusste zum Thema Windows Installation ...

Windows Server
gelöst Active Directory CA öffentlich vertrauenswürdig machen, geht das? (2)

Frage von DeathangelCH zum Thema Windows Server ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (22)

Frage von patz223 zum Thema Windows Userverwaltung ...

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (19)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...