I currently have a button containing the code below to Telnet with Windows XP and it works great. Since we are moving to Windows 7 and Telnet is not enabled automatically we have tried the instructions for enabling Telnet for Windows 7 but it doesn’t work for us. We still get the “File not found” error. Is it possible to use LotusScript and PowerShell to get my button to work? Thank you in advance for your help.
Dim db As NotesDatabase
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim view As NotesView
Dim result As Integer
Dim doc As NotesDocument
Dim uidoc As NotesuiDocument
Dim Workspace As New NotesUIWorkspace
Dim NumIPAddr As Variant
Dim key As Variant
Set db = session.CurrentDatabase
Set col = db.UnprocessedDocuments
Set doc = col.GetFirstDocument
Set uidoc = workspace.currentdocument
Set view = db.GetView(“Embedded Interface view”)
NumIPAddr = Cstr(Cint(doc.IPAddr1(0))) & “.” & Cstr(Cint(doc.IPAddr2(0))) & “.” & Cstr(Cint(doc.IPAddr3(0))) & “.” & Cstr(Cint(doc.IPAddr4(0)))
result = Shell ("Telnet " & NumIPAddr,3)
End Sub