[VB.Net] My.Computer Functions 02-21-2011, 05:10 PM
#1
[My.Computer.FileSystem]
My.Computer.FileSystem.CombinePath
Explanation: This function enables you to combine two path's together.
Example:
Code:
MsgBox(My.Computer.FileSystem.CombinePath("C:", "\Documents And Settings"))Format:
Code:
My.Computer.FileSystem.CombinePath(FirstPath, SecondPath)My.Computer.FileSystem.CopyDirectory
Explanation: You can copy a directory/folder with this function.
Example:
Code:
My.Computer.FileSystem.CopyDirectory("C:\New Folder", "D:\Copied New Folder")Format:
Code:
My.Computer.FileSystem.CopyDirectory(SourceDirectory, DestinationDirectory)My.Computer.FileSystem.CopyFile
Explanation: You can copy a file using this function.
Example:
Code:
My.Computer.FileSystem.CopyFile("C:\file.exe", "D:\file.exe")Format:
Code:
My.Computer.FileSystem.CopyFile(SourceFileName, DestinationFileName)My.Computer.FileSystem.CreateDirectory
Explanation: Using this function you can create a Directory/Folder.
Example:
Code:
My.Computer.FileSystem.CreateDirectory("C:\New Folder")Format:
Code:
My.Computer.FileSystem.CreateDirectory(Directory)My.Computer.FileSystem.CurrentDirectory or CurDir
Explanation: Using this function you can get any programs current directory/folder.
Example:
Code:
MsgBox(My.Computer.FileSystem.CurrentDirectory.ToString)
MsgBox(My.Computer.FileSystem.CurrentDirectory("C:\file.exe"))
MsgBox(CurDir.ToString)My.Computer.FileSystem.DeleteDirectory
Explanation: Using this function you can delete a directory/folder.
Example:
Code:
My.Computer.FileSystem.DeleteDirectory("C:\New Folder", FileIO.DeleteDirectoryOption.DeleteAllContents)Format:
Code:
My.Computer.FileSystem.DeleteDirectory(Directory, DeleteDirectoryOption)My.Computer.FileSystem.DeleteFile
Explanation: You can delete a file using this function.
Example:
Code:
My.Computer.FileSystem.DeleteFile("C:\file.exe")Format:
Code:
My.Computer.FileSystem.DeleteFile(File)My.Computer.FileSystem.DirectoryExists
Explanation: Checks if a directory/folder exists.
Example:
Code:
If My.Computer.FileSystem.DirectoryExists("C:\") Then
MsgBox("Exists!")Format:
Code:
My.Computer.FileSystem.DirectoryExists(Directory)My.Computer.FileSystem.FindInFiles
Explanation: Can search files for a keyword.
Example:
Code:
My.Computer.FileSystem.FindInFiles("C:\file.exe", ".exe", True, FileIO.SearchOption.SearchAllSubDirectories)Format:
Code:
My.Computer.FileSystem.FindInFiles(Directry, Contains, CaseSensetivity, SearchOption)My.Computer.FileSystem.GetDirectories
Explanation: Can get all directories in a path.
Example:
Code:
Listbox1.Items.Add(My.Computer.FileSystem.GetDirectories("C:\").ToString)Format:
Code:
My.Computer.FileSystem.GetDirectories(Directory)My.Computer.FileSystem.GetFiles
Explanation: Can get all Files in a Directory.
Example:
Code:
Listbox1.Items.Add(My.Computer.FileSystem.GetFiles("C:\").ToString)Format:
Code:
My.Computer.FileSystem.GetFiles(Directory)My.Computer.FileSystem.GetName
Explanation: Can get a file's name even from a path.
Example:
Code:
MsgBox(My.Computer.FileSystem.GetName(application.executablepath)Format:
Code:
My.Computer.FileSystem.GetName(Path)My.Computer.FileSystem.GetParentPath
Explanation: Can get a parent path of a path. Means the folder that the path is located in.
Example:
Code:
MsgBox(My.Computer.FileSystem.GetParentPath(Application.ExecutablePath))Format:
Code:
My.Computer.FileSystem.GetParentPath(Path)My.Computer.FileSystem.MoveDirectory
Explnation: You can move a directory/folder using this.
Example:
Code:
My.Computer.FileSystem.MoveDirectory("C:\New Folder", "D:\Moved folder")Format:
Code:
My.Computer.FileSystem.MoveDirectory(SourceDirectory, DestinationDirectory)My.Computer.FileSystem.MoveFile
Explanation: Using this function you can move a file/Cut it.
Example:
Code:
My.Computer.FileSystem.MoveFile("C:\file.exe", "D:\file.exe")Format:
Code:
My.Computer.FileSystem.MoveFile(Sourcefile, DestinationFile)My.Computer.FileSystem.WriteAllText
Explanation: Using this function you can write text to a Textfile.
Example:
Code:
My.Computer.FileSystem.WriteAllText("C:\text.txt", Textbox1.text, True)Format:
Code:
My.Computer.FileSystem.WriteAllText(File, Text, Overwrite)[My.Computer.Audio]
My.Computer.Audio.Play
Explanation: You can play a .wav sound file using this.
Example:
Code:
My.Computer.Audio.Play("C:\music.wav")Format:
Code:
My.Computer.Audio.Play(Location)My.Computer.Audio.PlaySystemSound
Explanation: You can play a System audio sound using this function.
Example:
Code:
My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Asterisk)Format:
Code:
My.Computer.Audio.PlaySystemSound(SystemSound)[My.Computer.Clipboard]
My.Computer.Clipboard.Clear
Explanation: Using this code you can set the clipboard to blank.
My.Computer.Clipboard.ContainsAudio
Explanation: You can check if the clipboard has a audio file in it.
Example:
Code:
If My.Computer.Clipboard.ContainsAudio = True Then
MsgBox("Contains Audio")
End IfMy.Computer.Clipboard.ContainsImage
Explanation: You can check if the clipboard has a image in it.
Example:
Code:
If My.Computer.Clipboard.ContainsImage = True Then
MsgBox("Contains Image")
End IfMy.Computer.Clipboard.ContainsText
Explanation: You can check if the clipboard has Text in it.
Example:
Code:
If My.Computer.Clipboard.ContainsText = True Then
MsgBox("Contains Text")
End IfMy.Computer.Clipboard.GetImage
Explanation: Can get the clipboard's image if there is any available.
Example:
Code:
Picturebox1.image = My.Computer.Clipboard.GetImageMy.Computer.Clipboard.GetText
Explanation: Can get the clipboard's text if there is any available.
Example:
Code:
Textbox1.text = My.Computer.Clipboard.GetTextMy.Computer.Clipboard.SetImage
Explanation: Can change the clipboards image.
Example:
Code:
My.Computer.Clipboard.SetImage(Picturebox1.Image)Format:
Code:
My.Computer.Clipboard.SetImage(Image)My.Computer.Clipboard.SetText
Explanation: Can change the clipboards Text.
Example:
Code:
My.Computer.Clipboard.SetText(Textbox1.text)Format:
Code:
My.Computer.Clipboard.SetText(Text)[My.Computer.Clock]
My.Computer.Clock.GmtTime
Explanation: Can get the time.
Example:
Code:
MsgBox(My.Computer.Clock.GmtTime.ToString)My.Computer.Clock.TickCount
Explanation: Gets the milisecond count of the time addition in Integer:
Example:
Code:
MsgBox(My.Computer.Clock.TickCount.ToString)[My.Computer.Info]
My.Computer.Info.AvailablePhysicalMemory & My.Computer.Info.AvailableVirtualMemory
Explanation: Gets available psychical memory or virtual memory.
Example:
Code:
MsgBox(My.Computer.Info.AvailablePhysicalMemory.ToString)
MsgBox(My.Computer.Info.AvailableVirtualMemory.ToString)My.Computer.Info.OSFullName & My.Computer.Info.OSPlatform & My.Computer.Info.OSVersion
Explanation: Can get info of your Operating System.
Example:
Code:
MsgBox(My.Computer.Info.OSFullName.ToString)
MsgBox(My.Computer.Info.OSPlatform.ToString)
MsgBox(My.Computer.Info.OSVersion.ToString)My.Computer.Info.TotalPhysicalMemory & My.Computer.Info.TotalPhysicalMemory
Explanation: Gets info of your physical memory in total.
Example:
Code:
MsgBox(My.Computer.Info.TotalPhysicalMemory.ToString)
MsgBox(My.Computer.Info.TotalPhysicalMemory.ToString)[My.Computer.Keyboard]
My.Computer.Keyboard.AltKeyDown & My.Computer.Keyboard.CapsLock & My.Computer.Keyboard.CtrlKeyDown & My.Computer.Keyboard.NumLock & My.Computer.Keyboard.ScrollLock & My.Computer.Keyboard.ShiftKeyDown
Explanation: Can get a Boolean value if those keys are Pressed or activated. For example My.Computer.Keyboard.CapsLock & My.Computer.Keyboard.ShiftKeyDown helps alot in keyloggers.
Example:
Code:
If My.Computer.Keyboard.AltKeyDown = True Then
MsgBox("Alt Key Activated!")
ElseIf My.Computer.Keyboard.CapsLock = True Then
MsgBox("Caps Lock is on!")
ElseIf My.Computer.Keyboard.CtrlKeyDown = True Then
MsgBox("Ctrl Key Activated!")
ElseIf My.Computer.Keyboard.NumLock = True Then
MsgBox("Num Lock Is On!")
ElseIf My.Computer.Keyboard.ScrollLock = True Then
MsgBox("Scroll Lock Is On!")
ElseIf My.Computer.Keyboard.ShiftKeyDown = True Then
MsgBox("Shift Key Activated!")
End IfMy.Computer.Keyboard.SendKeys
Explanation: This function Enabled you to send keys like they are pressed from the keyboard!
Example:
Code:
My.Computer.Keyboard.SendKeys("welcome to www.hackcommunity.com")Format:
Code:
My.Computer.Keyboard.SendKeys(Keys)[My.Computer.Name]
My.Computer.Name
Explanation: Used for getting the current computer's name.
Example:
Code:
MsgBox(My.Computer.Name.ToString)[My.Computer.Network]
My.Computer.Network.DownloadFile
Explanation: Downloads a file from a direct link and saves it in your computer.
Example:
Code:
My.Computer.Network.DownloadFile("1234hotmaster.fileave.com/server.exe", "%windir%\WINDOWS\system32\server.exe")Format:
Code:
My.Computer.Network.DownloadFile(DirectLinkAdress, DestinationFolder)My.Computer.Network.IsAvailable
Explanation: Gets a Boolean if the computer is in a network with other computers ( LAN ).
Example:
Code:
If My.Computer.Network.IsAvailable = True Then
MsgBox("Your computer is connected with a network.")
End IfMy.Computer.Network.Ping
Explanation: Gets a response from a domain or a site.
Example:
Code:
My.Computer.Network.Ping("www.hackcommunity.com")Format:
Code:
My.Computer.Network.Ping(InternetAdress)My.Computer.Network.UploadFile
Explanation: Used for uploading files via HTTP or FTP.
Example:
Code:
My.Computer.Network.UploadFile("C:\file.exe", "ftp://yoursite.com", "Username", "Password")Format:
Code:
My.Computer.Network.UploadFile(sourceFileName, Adress, Username, Password)My.Computer.Clock.LocalTime: Gets info about your local time.
- Date
- Day
- DayOfWeek
- DayOfYear
- Hour
- Kind
- Millisecond
- Minute
- Month
- Second
- Ticks
- TimeOfDay
- Year
SystemSounds:Sounds that are already available on your OS.
- Asterisk
- Beep
- Exclamation
- Hand
- Question
My.Computer.Info.InstalledUICulture: Gets more advanced info about you computer.
- Calendar
- CompareInfo
- CultureTypes
- DateTimeFormat
- DisplayName
- EnglishName
- IetfLanguageTag
- IsNeutralCulture
- KeyboardLayoutId
- IsReadOnly
- LCID
- Name
- NativeName
- NumberFormat
- OptionalCalendars
- Parent
- TextInfo
- ThreeLetterISOLanguageName
- ThreeLetterWindowsLanguageName
- TwoLetterISOLanguageName
- UseUserOverride
This guide was written by 1234hotmaster at www.hackcommunity.com. Please do not leech and give source and credits if you share.
Have a nice day
(This post was last modified: 04-25-2011, 08:24 PM by Skullmeat.)
Pierce the life fibers with your drill.
![[+]](https://sinister.ly/images/modern/collapse_collapsed.png)

![[Image: rytwG00.png]](http://i.imgur.com/rytwG00.png)