Your technology certification is waiting. Enroll in Cloud Class ®
Dim myTable As New Collection
Dim slq_String as String
'this is the connection string which specifies db driver, db, and login details if needed
Const ConnString As String = _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source='path and db' For Excel.mdb;Persist Security Info=False"
sql_String = "SELECT * FROM a_table"
Dim Con As ADODB.Connection ' Con is the connection
Dim RecordSet As ADODB.RecordSet ' this is the records we will get
Set Con1 = New ADODB.Connection 'sets up the connection through ado
Con1.ConnectionString = ConnString
Set RecordSet = New ADODB.RecordSet
Call RecordSet.Open(SQL, Con1)
'check if there are any records
If .BOF And .EOF Then
MsgBox "There are no records"
Do While Not .EOF
Open in new window
The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.
One of a set of tools we're offering as a way of saying thank you for being a part of the community.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.