by Anonymous (267 Submissions)
Category: Windows System Services
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Sat 15th June 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Add basic AUTORUN capability to your A: drive (Put autorun filename as first line of AUTORUN.INF)
Me.Visible = False
Timer1.Interval = 1000
End Sub
Sub Timer1_Timer ()
Dim f,d
On Error Goto EndSub
f = FreeFile
Open "A:\autorun.inf" For Input As f
Line Input #1, d
Close f
GetAttr f
Shell f
EndSub:
End Sub
No comments have been posted about Add basic AUTORUN capability to your A: drive (Put autorun filename as first line of AUTORUN.INF). Why not be the first to post a comment about Add basic AUTORUN capability to your A: drive (Put autorun filename as first line of AUTORUN.INF).