Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. RoobarbnCustard

    ShutdownWindows

    Option Explicit Dim Shell, Title, obj ' Fetch the object reference for the Shell Set Shell = WScript.CreateObject ("Shell.Application") Set obj = WScript.CreateObject("WScript.Shell") ' invoke the End-method? If (MsgBox("Logoff?",vbYesNo + vbQuestion, Title) =...
  2. RoobarbnCustard

    Resolution

    Try using the percentage command instead of exact sizes for your graphics etc.... For example: <A HREF=blahblah><IMG ALIGN=Center SRC=&quot;somejpg.jpg&quot; width=&quot;60%&quot; height=&quot;28%&quot; border=&quot;0&quot; alt=&quot;some explanation&quot;>
  3. RoobarbnCustard

    Checking Password Age

    This will give you the age of the password in days :- on error resume next dim wshshell, objuser, myfile, FSO objPath =inputbox(&quot;Please enter users login&quot;) adsPath = &quot;WinNT://idghead/&quot; & objPath &&quot;,user&quot; Set objuser = GetObject(adsPath) set FSO =...
  4. RoobarbnCustard

    Active Directory mail attribute

    Which ADSI provider are you using?
  5. RoobarbnCustard

    Wscript does not work

    Try using the <script> INSERT VBS HERE </script>
  6. RoobarbnCustard

    VBScript for Remote Offices

    If your client PC's are Windows 98 you can use the script part below :- set personal=wscript.createobject(&quot;wscript.shell&quot;) personal.regwrite&quot;HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User shell Folders\personal&quot;,&quot;\\SERVER_NAME\SHARE&quot...
  7. RoobarbnCustard

    Enumerating Login times

    on error resume next set wshshell=wscript.createobject(&quot;Wscript.shell&quot;) Set dom = GetObject(&quot;WinNT://idghead&quot;) set FSO = CreateObject(&quot;scripting.FileSystemObject&quot;) set myFile = fso.createtextfile(&quot;users.txt&quot;, true) dom.Filter = Array(&quot;user&quot;) For...

Part and Inventory Search

Back
Top