Submitted by: Submitted by Scorpion9791
Views: 784
Words: 1901
Pages: 8
Category: Science and Technology
Date Submitted: 01/15/2013 02:45 PM
COMP230_W4_IP_Array_Report Student Name | | Class | | Date | |
VBScript IP Array Lab Key
In the space provided below, copy and paste your VBScript Program Code. If it doesn’t fit, use the next page for the continuation of your sourcecode program
' VBScript: IP_Array.vbs
' Written by:
' Date:
' Class:
' Professor:
' ===================================
' This initialize a 2-dimension array
' of IP Address. The first index +100
' is the room# and the second index+1
' is the computer# in the room.
dim ipAddress(5,3)
ipAddress(0,0)="192.168.10.11"
ipAddress(0,1)="192.168.10.12"
ipAddress(0,2)="192.168.10.13"
ipAddress(0,3)="192.168.10.14"
ipAddress(1,0)="192.168.10.19"
ipAddress(1,1)="192.168.10.20"
ipAddress(1,2)="192.168.10.21"
ipAddress(1,3)="192.168.10.22"
ipAddress(2,0)="192.168.10.27"
ipAddress(2,1)="192.168.10.28"
ipAddress(2,2)="192.168.10.29"
ipAddress(2,3)="192.168.10.30"
ipAddress(3,0)="192.168.10.35"
ipAddress(3,1)="192.168.10.36"
ipAddress(3,2)="192.168.10.37"
ipAddress(3,3)="192.168.10.38"
ipAddress(4,0)="192.168.10.43"
ipAddress(4,1)="192.168.10.44"
ipAddress(4,2)="192.168.10.45"
ipAddress(4,3)="192.168.10.46"
ipAddress(5,0)="192.168.10.51"
ipAddress(5,1)="192.168.10.52"
ipAddress(5,2)="192.168.10.53"
ipAddress(5,3)="192.168.10.54"
' Define Script Variables
roomStr = ""
compStr = ""
room = 0
computer = 0
ans=""
'Prompt User for Room and Computer Numbers
Do
WScript.Echo "Please Enter the Room Number (100-105) ....."
roomStr = WScript.StdIn.ReadLine()
If (roomStr >= 100) And (roomStr <= 105) Then Exit Do
' VBScript: IP_Array.vbs
' Written by:
' Date:
' Class:
' Professor:
' ===================================
' This initialize a 2-dimension array
' of IP Address. The first index +100
' is the room# and the second index+1
' is the computer# in the room.
dim ipAddress(5,3)
ipAddress(0,0)="192.168.10.11"...