ITILv3 Study Guide

ITILv3 Foundations Study Notes:
https://drive.google.com/file/d/0B5ttjkGSReNecld4UlB1LXNkcU0/view?usp=sharing

Copy File from Bootflash to Subdirectory

Bootflash with "/37subs" as a subdirectory.

copy clientlib-28445_R0-0.log 37subs/

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Copy from subdirectory to bootflash (root):

copy tracelogs/clientlib-28445_R0-0.log bootflash: 

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

go up one level:

cd

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

request platform software package expand file bootflash:37subs/asr1001-universalk9.03.07.06.S.152-4.S6.bin

http://www.cisco.com/c/en/us/td/docs/routers/asr1000/configuration/guide/chassis/asrswcfg/issu.html#pgfId-1150636

VACL Working Config

Goal: Allow PC1 to talk with anything on the local LAN (10.12.14.0/24) but block PC1 from accessing the Internet. Only allow PC2 to access the Internet. Block everything else.

Note: 3750 layer-2 switch (ip routing disabled), running "c3750-ipservicesk9-mz.122-50.SE4.bin"

Note: For some reason, I had to use wildcard masks instead of "host" (it wasn't working, troubleshot, but gave up).


PC1: 10.12.14.134/24 (on port f1/0/5)

PC2: 10.12.14.133/24 (on port f1/0/7)

Internet Connection: (on port f1/0/9)

##############################################################
!
mac access-list extended permitARP
 permit any any 0x806 0x0
!
ip access-list extended LocalOnlyACL
 permit ip 10.12.14.0 0.0.0.255 10.12.14.0 0.0.0.255
!
ip access-list extended InternetOnlyACL
 permit ip 10.12.14.133 0.0.0.0 any
 permit ip any 10.12.14.133 0.0.0.0
!
!
vlan access-map myVACLMap 10
 action forward
 match ip address LocalOnlyACL   
!
vlan access-map myVACLMap 11
 action forward
 match ip address InternetOnlyACL 
!
vlan access-map myVACLMap 15
 action forward
 match mac address permitARP      
!
vlan access-map myVACLMap 20
 action drop                     
!
!
vlan filter 123 vlan-list 44
!
!
interface FastEthernet1/0/5
 switchport access vlan 44
 switchport mode access
 spanning-tree portfast
!
interface FastEthernet1/0/7
 switchport access vlan 44
 switchport mode access
 spanning-tree portfast
!
interface FastEthernet1/0/9
 switchport access vlan 44
 switchport mode access
 spanning-tree portfast
!
end
##############################################################

Test Excel VBS - Working code using Sub Routines

Dim arrFileLines()

'##############################################################################
Set fso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("WScript.Shell")

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True

userDesktopPath = objShell.SpecialFolders("Desktop")
userDesktopFullPath = userDesktopPath & "\test.xlsx"

Set objWorkbook = objExcel.Workbooks.Open(userDesktopFullPath)
Set objWorksheet = objWorkbook.Worksheets(1)
'###################################################################|



' Start main section of code
'~~~~~~~~~~~~~~~|||~~~~~~~~~~~~~~~~~
t = 0

readSpreadsheet

firstB = True

'~~~~~~~~~~~~~~~|||~~~~~~~~~~~~~~~~~
' End main section of code




' Read Excel spreadsheet, insert cell values into script
'##############################################################################
Sub readSpreadsheet

If (fso.FileExists(userDesktopFullPath)) Then
' MsgBox userDesktopFullPath
Else
MsgBox "You are Missing the Router List Text File", 48, "Start Over"
WScript.Quit
End If


intRow = 1

Do Until objExcel.Cells(intRow,1).Value = ""
netName = Trim(objExcel.Cells(intRow,1).Value)
blah33 netName,intRow
intRow = intRow + 1
Loop

j=1
For Each word In arrFileLines
MsgBox word & vbCrLf & "This is the final array"
objExcel.Cells(j,2).Value = word
j = j + 1
Next


End Sub
'###################################################################|



'##############################################################################
Sub blah33 (xx, yy)

myVar = objExcel.Cells(yy,1).Value
buildArray myVar, t

End Sub
'###################################################################|



'##############################################################################
Sub buildArray (zz,tt)

ReDim Preserve arrFileLines(tt)
arrFileLines(tt) = zz
MsgBox arrFileLines(tt) & vbCrLf & tt
tt = tt+1

End Sub
'###################################################################|

Build Array from String, Count Each Element Index

myStr = "this sentence is just fine"

msg = Split(myStr)

numStr = UBound(msg) + 1

MsgBox numStr

'For Each word In msg
' MsgBox word
' If word = "is" Then
' MsgBox msg(word)
' End If
'Next


For x = LBound(msg) To UBound(msg)
MsgBox msg(x) & " " & x
If x <> UBound(msg) Then
MsgBox msg(x+1)
End If
Next

Parse File, Write to a Different File

Const ForReading = 1

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Scripts\test2.txt", ForReading)

Set objWrite = objFSO.OpenTextFile("C:\Scripts\output.txt", 2)

Dim arrFileLines()

i = 0

Do Until objFile.AtEndOfStream
Redim Preserve arrFileLines(i)
arrFileLines(i) = objFile.ReadLine
i = i + 1
Loop

objFile.Close

For Each strLine in arrFileLines
MyArray = Split(strLine, ".", -1, 1)
Msg = MyArray(0)
Msgbox Msg

objWrite.WriteLine("<a href=""https://comp.service-now.com/GOTO=" & Msg & Chr(34) & ">" _
& Msg & "</a>" & "</p>" & vbCrLf)

' objWrite.WriteLine("=HYPERLINK(""https://comp.service-now.com/GOTO=" & Msg _
' & Chr(34) & "" & ",""Click Here"")")

' objWrite.WriteLine("https://comp.service-now.com/GOTO=" & Msg)

Next

Using VMware ESXi 5.5 for Virtual Networking Labs

Spent the past few weeks putting this together. Wanted to pull all the disjointed silos of information together into a single document.

Enjoy.

PDF (25 MB)
ESXi 5.5 Setup How To (Signed).pdf

The Worst Thing You Can Do For Your Grandma is Convince Her to Get an Android Phone

I have a plea for all of those people out there who love their Android phones. For the love of Pete, *DO NOT* convince your elderly Grandmother to get an Android phone!

As some of you are aware, I've been providing small-time tech support since about 2001 (as a side-business to my main job as a Network Engineer). I cannot begin to count the number of times I've been on the phone with an elderly person troubleshooting an Android phone problem. Don't even get me started on the issue of Android fragmentation. :|

I'm no Apple FanBoi (I hate that word), but I can say that I've seen the elderly handle the iPhone's iOS with ease. Downloading apps? Easy. Setting up email? Easy. Texting, sending a photo over SMS, taking a picture, making new contacts? All easy on the iPhone. 

I *challenge* anyone with any modicum of technical skill to watch a senior citizen try to do *any* of the above on an Android phone. You will cringe, you will cry. I *dare* you to try to do any of that over the phone... You'll want to strangle Android. 

You'll want to strangle the person who convinced Grandma to get an Android phone.

Sapphire Glass -- Ending the Need for Screen Protectors?

The iPhone 6 is rumored to have Sapphire Glass as a screen. Could this new technology end the need for screen protectors?

If Given a Choice, Which Computer Would the Amish Choose?

It's official... The Amish prefer Macs!