| 407 |
|
' prepare the contents of the XML packet. |
| 408 |
|
seqNo = seqNo + 1 |
| 409 |
|
|
| 410 |
< |
' Comment this line in the next protocol |
| 411 |
< |
'machineName = TCPSock.LocalHostName |
| 410 |
> |
netbiosName = TCPSock.LocalHostName |
| 411 |
|
|
| 412 |
|
LocalIP = TCPSock.LocalIP |
| 413 |
|
packetDate = Date2Num() |
| 466 |
|
' build the contents of the XML packet |
| 467 |
|
xml = "<packet seq_no=""" & seqNo & """ machine_name=""" & machineName & """ date=""" & packetDate & """ type=""data"" ip=""" & LocalIP & """>" & _ |
| 468 |
|
"<os>" & _ |
| 469 |
+ |
"<netbios_name>" & netbiosName & "</netbios_name>" & _ |
| 470 |
|
"<name>" & osName & "</name>" & _ |
| 471 |
|
"<version>" & osVersionMajor & "</version>" & _ |
| 472 |
|
"<release>" & osBuild & "</release>" & _ |