Jump to content

psycho

Active Members
 View Profile  See their activity

  • Posts

    51

  • Joined

  • Last visited

 Content Type 

Posts posted by psycho

    Help Desk Software

    in Questions

    Posted

    remedy isn't that bad now, but i'd still stay away from it if possible. one thing you can do is just create a web part for sharepoint if you are using that, this allows users to input a ticket, the helpdesk then works the ticket and can track everything including totals, types, etc.....

    Hak5 BBS Back Online

    in Community Projects

    Posted

    I used to IRC telnet all the time back in the day. ALOT of wasted hours spent in BBS's exchanging files and other tidbits of information. I used the local one until the day it got turned off which made me pretty sad. Maybe I should set one up for the locals again if i can't send them hak5's way. Will give it some thought.

    i ran one for a while locally until i took everything offline when i got deployed last year

    VBScript Help

    in Questions

    Posted

    i am trying to code a vbscript to tell me where a username is logged into on a domain running xp machines and 2k3 svr, here is what i have......can you help?????

    '================================================================
'VBScript to find where a user is logged into
'Written by Psycho
'================================================================

Dim WshShell : Set WshShell = WScript.CreateObject("WScript.Shell")
Dim WshNetwork : Set WshNetwork = WScript.CreateObject("WScript.Network")
Dim objArgs : Set objArgs = WScript.Arguments ' create object with collection
Dim fso : Set fso = WScript.CreateObject("Scripting.FilesystemObject")
Const ForReading=1, ForWriting=2


If objArgs.Count >= 1 Then
strUserName = objArgs(0) 'assign the passed user name to a variable
Else 'quit the script, no variable given, or too many variables passed
strUserName = InputBox("Enter the name of the individual you wish to query",,WshNetwork.UserName)
If strUserName = "" Then WScript.Quit
End If

If IsNull(strUserName) OR strUserName = "" Then WScript.Quit

OutputFilePath = "c:ip1.txt"

' Flush the cache
WshShell.Run "cmd /c nbtstat.exe -R", 2, False
WScript.Sleep 1000
' Send a message to the user
WshShell.Run "cmd /c net send " & strUserName & " Test locator message.", 2, True
WScript.Sleep 1000
' check the local machines cache, looking for UNIQUE
WshShell.Run "cmd /c nbtstat.exe -c | find ""UNIQUE"" > " & OutputFilePath, 2, True
WScript.Sleep 1000

On Error Resume Next

Dim objFile : Set objFile = fso.OpenTextFile(OutputFilePath, ForReading)
Dim strIPAddress : strIPAddress = Trim(Mid(objFile.ReadLine,42,15)) 'read the line

' Nobody home
If Err.Number <> 0 Then
WshShell.Popup "User '" & UCASE(strUserName) & "' is most likely not logged on anywhere.", 8, "User not found"
objFile.Close
fso.DeleteFile(OutputFilePath) 
WScript.Quit
End If
objFile.Close

WshShell.Run ("cmd /c nbtstat.exe -A " & strIPAddress & " > " & OutputFilePath)
WScript.Sleep 1000

Set objFile = fso.OpenTextFile(OutputFilePath, ForReading)

Do While objFile.AtEndOfStream <> True
aline=Trim(objFile.Readline) 'read a line
SearchString = "<20>" '20 says file sharing is installed and enabled. See Below!!
MyPos = Instr(1, aline, SearchString, 1) ' A textual comparison starting at
If MyPos <> 0 Then
strComputerName = Trim(Left(aline, (MyPos-1)))
MsgBox "Machine Name: " & strComputerName
End If
Loop

objFile.Close
Set objFile = Nothing
fso.DeleteFile(OutputFilePath) 

' when running nbtstat, these are the codes
'00 Base computer name and Workgroups 
'01 Master Browser 
'03 Message Alert service (name of logged in user) 
'20 Resource Sharing `server service` name 
'1B Domain master-browser name 
'1C Domain controller name 
'1E Domain/workgroup master browser election announcement

    Simple Telnet Bat File Client

    in Everything Else

    Posted

    To create a simple .bat file to make telnet easier paste the code below into wordpad or notepad and save it as whatever.bat

    @echo off

:A 

Cls

echo HaroldSearchNetworks Basic Telnet Client.

set /p n=Site Address: 

set /p m=Port (leave blank for default): 

telnet %n% %m% 

Pause

Goto A

    You can check out my Telnet chat room at

    hsnclanserver.gotdns.com

    You can use the app above or other telnet client, if you use windows telnet type it like this.

    telnet hsnclanserver.gotdns.com 23

    too long, if you wanted a .bat to telnet all you need to type in it is 

    @echo off

telnet reddragon.dyndns.org

    for example

    Firewall Protection

    in Questions

    Posted

    that made no sense

    what made no sense about it, if you ask someone what the best firewall out there is, you will get different responses stating they are the best, if you just ask what do you guys use, you will still get different responses because there is always something better than what you think is the best

    Firewall Protection

    in Questions

    Posted

    well to put it to ya this way, if you ask "the best" you will get this and that, one thing to ask would be "what do you use?"

    as for me i use Sygate on windows, with a few little homebrew things on the side and i haven't had any problems

×
×
  • Create New...