by Kramnik_wesley (1 Submission)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 14th November 2003
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
With this small program, you are able to save your current IP-data and configuration on just clicking one button and giving a path-name in a
API Declarations
Public inpb As String
Public waarde, waarde2 As String
Public intt As Integer
inpb = InputBox("IP QUICK saves your IP-data in a textdocument." & Chr(13) & "In order to do this, give the pathname where to be saved:", "IP QUICK")
If Right(inpb, 1) = "\" Then
waarde = "ipconfig/all >" & inpb & "IP_QUICK.txt"
Else
waarde = "ipconfig/all >" & inpb & "\IP_QUICK.txt"
End If
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
If intt = 0 Then
style = Shell("cmd.exe", vbMinimizedFocus)
ElseIf intt = 1 Then
SendKeys (waarde & "{enter}")
ElseIf intt = 2 Then
Timer1.Enabled = False
Unload Form1
End If
intt = intt + 1
End Sub
No comments have been posted about With this small program, you are able to save your current IP-data and configuration on just clicki. Why not be the first to post a comment about With this small program, you are able to save your current IP-data and configuration on just clicki.