Advertisement
Ham62

StupidFilePath.bas

Oct 8th, 2017
500
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Dim tmp as string
  2. dim filename as string
  3. Filename = "C:\windows\..\Program Files\..\subsonic\jetty\830afc\jsp\org\apache\jsp\WEB_002dINF\jsp\..\..\..\..\..\..\webapp\flash\..\..\..\..\..\"
  4. Filename += "AMD\Packages\Drivers\Radeon-Crimson-ReLive-17.4.4-c7313748-64bit-170504_drvWHQL\B313602\..\..\..\..\..\"
  5. Filename += "favorites.pls"
  6. var iResult = open (Filename for input as #1)
  7. if iResult then print iResult: sleep: end
  8.  
  9. input #1, tmp
  10. print tmp
  11.  
  12. close #1
  13. sleep
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement