Exam (elaborations)
COMP-230 Week 6 Lab: VBScript IP File Report (SOLVED
- Course
- Institution
COMP-230 Week 6 Lab: VBScript IP File Report (SOLVED
[Show more]
Seller
Follow
ProfGoodlucK
Reviews received
Content preview
Student Zackery Kost Class COMP- Dat 02/06/20Name 230 e 17
VBScript IP File Report
In the space provided below, copy and paste your IP_FileWrite.vbs program sourcecode. If it
doesn’t fit, use the next page for the continuation of your program sourcecode.
' This initializes 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)
dim room
dim computer
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 the constants
Const READ = 1
Const WRITE = 2
Const APPEND = 8
Const ASCII = 0
'''''defining the varables
fileName = "IP_Addresses.csv"
ipAddrStr = ""
'creating the new files
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(fileName) Then
fso.DeleteFile(fileName)
End If
COMP230_W6_IP_File_Report.docx 1
This study source was downloaded by 100000845689434 from CourseHero.com on 05-05-2022
Revision Date: 1213
12:24:34 GMT -05:00
https://www.coursehero.com/file/20057629/COMP-230-ZKost-iLab-Week-6/
, In the space provided below, copy and paste the remainder of your IP_FileWrite.vbs
sourcecode if it did not fit in the first textbox.
' writing room, comp, and address to a file
For room = 0 to 5
For computer = 0 to 3
ipAddrStr = CStr(room + 100) & "," & CStr(computer + 1) & "," & _
ipAddress(room, computer) & vbCrlf
ipAddrFile.Write(IpAddrStr)
Next
Next
ipAddrFile.Close
Set ipAddrFile = fso.OpenTextFile(fileName,READ,ASCII)
WScript.Echo ipAddrFile.ReadAll
COMP230_W6_IP_File_Report.docx 2
This study source was downloaded by 100000845689434 from CourseHero.com on 05-05-2022
Revision Date: 1213
12:24:34 GMT -05:00
https://www.coursehero.com/file/20057629/COMP-230-ZKost-iLab-Week-6/
The benefits of buying summaries with Stuvia:
Guaranteed quality through customer reviews
Stuvia customers have reviewed more than 700,000 summaries. This how you know that you are buying the best documents.
Quick and easy check-out
You can quickly pay through credit card or Stuvia-credit for the summaries. There is no membership needed.
Focus on what matters
Your fellow students write the study notes themselves, which is why the documents are always reliable and up-to-date. This ensures you quickly get to the core!
Frequently asked questions
What do I get when I buy this document?
You get a PDF, available immediately after your purchase. The purchased document is accessible anytime, anywhere and indefinitely through your profile.
Satisfaction guarantee: how does it work?
Our satisfaction guarantee ensures that you always find a study document that suits you well. You fill out a form, and our customer service team takes care of the rest.
Who am I buying these notes from?
Stuvia is a marketplace, so you are not buying this document from us, but from seller ProfGoodlucK. Stuvia facilitates payment to the seller.
Will I be stuck with a subscription?
No, you only buy these notes for $10.99. You're not tied to anything after your purchase.
Can Stuvia be trusted?
4.6 stars on Google & Trustpilot (+1000 reviews)
77254 documents were sold in the last 30 days
Founded in 2010, the go-to place to buy study notes for 14 years now