read & write to AD attribute added by exchange

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ VBscripts
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - Site from IP Hi All, I need to get the site information from an IP address. Does anyone know if it is possible to run some kind of query against the Active Directory to get the site name of a given IP address? Cheers Thomas Tag: read & write to AD attribute added by exchange Tag: 174131
  - 2
    - GetDetailsof question I am using the GetDetailsOf function to retrieve information about a number of files. One of the details I am retrieving is Owner. Often, it comes back and says "Administrators" instead of an actual user ID. Any idea what that means? Dennis Hancy Eaton Corporation Cleveland, OH Tag: read & write to AD attribute added by exchange Tag: 174130
  - 3
    - Windows XP Home or Pro? Is there any way to distinguish between Windows XP Home and Windows XP Pro in VBS *without* using the WMI Win32_OperatingSystem.Name property? regards, Andy -- ********** Please send e-mail to: usenet (dot) post (at) aaronoff (dot) com To identify everything that starts up with Windows, download "Silent Runners.vbs" at www.silentrunners.org ********** Tag: read & write to AD attribute added by exchange Tag: 174128
  - 4
    - Read data from first Excel sheet Hi, I need to read data from an Excel sheet. So far I managed to do so using: Set ExcelConn = Server.CreateObject("ADODB.Connection") Set ExcelRS = Server.CreateObject("ADODB.Recordset") ExcelConn.Provider = "Microsoft.Jet.OLEDB.4.0" ExcelConn.Properties("Extended Properties").Value = "Excel 8.0" ExcelConn.Open defaultPath & "\" & f set ExcelRS = ExcelConn.Execute ("SELECT * FROM [Sheet1$]") While NOT ExcelRS.EOF ... ExcelRS.MoveNext Wend ExcelRS.Close ExcelConn.Close set ExcelRS = NOTHING set ExcelConn = NOTHING This works as long as the sheet is named 'Sheet1'. Some of the users use a localised version of Excel which names the first sheet differently (or rename it manually). Is it possible to have ASP loop through the data on the first sheet, regardless its name? TIA! Tag: read & write to AD attribute added by exchange Tag: 174126
  - 5
    - Detect if "member of" some group Hi I would like do have a common loginscript and in that script link to other scripts according to e.g. the membership to an AD group. Could be like this in pseudo <<Common login script map common network drives distribute common templates and documents if memberOF("technicians1") then runscript("tech1.vbs") else if memberOF("technicians2") then runscript("tech2.vbs") if memberOF("admin") then runscript("admin.vbs") etc. Is there an example somewhere? TIA Henry Tag: read & write to AD attribute added by exchange Tag: 174122
  - 6
    - Auto Arrange Hi All, Have searched high and low for this to no avail. I would like to have all users have auto arrange on for desktop icons. Would some kind soul have a script to do this? Cheers David Tag: read & write to AD attribute added by exchange Tag: 174121
  - 7
    - do a query dns to retrieve the content of a TXT record Hi guys, I wanna try to query a dns to retrieve the content of a TXT record. I Just know how to do it using the nslookup.exe program in a vbscript, but now I would like to do something of more "proffessional". Any hints? Ciao, Sergio Tag: read & write to AD attribute added by exchange Tag: 174120
  - 8
    - Somewhat OT: regsiter system file thru batch? Hey folks, I just wrote a little vbscript to run from my OS' start-up folder that detects when a resume from suspend occurs then fires up a batch file. What I hope to do is somehow refresh, re-register, or whatever a system (*.sys) file because it doesn't handle power management events very well. Is this possible? I know one can register dlls with regsvr32 /i, but is there something similar for system files? Thanks for any ideas and sorry if this is WAY OT, Dave ______________________________ Remove "_SPAM" to reply directly. Tag: read & write to AD attribute added by exchange Tag: 174104
  - 9
    - Is there an easy way to display all properties/methods of an object? I understand that some languages like Java allow you to loop through or otherwise "dump" a list of properties for an object. I have some classes that I've written in vbScript for my ASP 3.0 pages. It would be nice if I could programmatically generate a list of all properties (and methods, if possible). Is there a way to loop through the items in this way? Thanks, Ken Fine Tag: read & write to AD attribute added by exchange Tag: 174096
  - 10
    - Get stdout from EXE If I execute an exe from within a vbscript, how can I retrieve the output sent to stdout? Ideally, without using a temp file. This particular exe produces multiple lines of output. Tag: read & write to AD attribute added by exchange Tag: 174089
  - 11
    - Searching log file for a matching string nnanna wrote: > *I help here. I want to search a log file for a matching string and > keep count of the number of times a match is found and the string > name. I will be pulling the string from another text file one line at > a time. * -- nnanna ------------------------------------------------------------------------ Posted via http://www.codecomments.com ------------------------------------------------------------------------ Tag: read & write to AD attribute added by exchange Tag: 174088
  - 12
    - Indent Text I need to indent some text for our history department. Example: Q01. Who is credited with saying "Hard Work will always increase your skill level"? Hint 20th President of the United States. Q02. Who is credited with saying "Who assigned the United States to oversee the world"? Hint 23rd President of the United States. Even in the example above I could not get the word "world" to display in the proper position. Thanks for any assistance in advance. Len Tag: read & write to AD attribute added by exchange Tag: 174083
  - 13
    - Display Math Formulas I need to display math formulas to my students. for example Einstein's E = MC2, or to calcilate the earth around the sun. C = (D x 3.14squared) x 25,463 x 3.14Squared / 24. I want to display the exponent (power) of the formula the way it should be displayed. In word I use the Footnote feature. How can I accomplish this on a Web Page? Thanks for any assistance! Grandmama Tag: read & write to AD attribute added by exchange Tag: 174082
  - 14
    - basic Q: Only one way to make vars live outside of the scope of a function without globals? This is a basic question about the design and intent of functions in programming languages like VBscript. I know how to write VBScript functions and to pass parameter variables in and out of them. As I've become a smarter programmer, I'm inclined to translate the lousy code that I wrote when I didn't know what was doing into more granularized and encapsulated functions and/or classes. I was revisiting some VBScript browser detection code that looked something like this: ' check something ' set a variable based on result of check ' check something else ' set a different variable based on result of check ' check something else ' set a different variable based on result of check The code sets about a dozen different variables of interest. The code was not organized as a function. It's certainly easy enough to make it a sub or function and to call it, but the variables that are set internally in the function don't live outside of the scope of the function. I want someone to confirm that the "correct" way/only way to make many variables survive outside of the function is to return an object (e.g. an array) of values upon the function's completion. The function could write global vars, but that isn't good practice. Am I correct in this, or is there another way that I'm missing? Thank you, Ken Fine Tag: read & write to AD attribute added by exchange Tag: 174079
  - 15
    - adding an smtp address Hi there running win2000AD with exchange server 2000. I would like to add an smtp address of all my users. Is there a good hint to using a vb script? Thanks Brian Tag: read & write to AD attribute added by exchange Tag: 174076
  - 16
    - Searching log file for a matching string I help here. I want to search a log file for a matching string and keep count of the number of times a match is found and the string name. I will be pulling the string from another text file one line at a time. -- nnanna ------------------------------------------------------------------------ Posted via http://www.codecomments.com ------------------------------------------------------------------------ Tag: read & write to AD attribute added by exchange Tag: 174074
  - 17
    - add domain users to local power users group with vbscript not GPO or startup Im wondering if someone knows how to add domain users to local groups with a vbscript. Id like to be able to add individual domain users to there computers local admin group with out a GPO logonscript. Id like to do this remotely from my pc as well. Can anyone help me out thanks rc Tag: read & write to AD attribute added by exchange Tag: 174073
  - 18
    - Reading From Text File and sending it to SQL Database. Here is the question: InputFile.txt has the following four Lines. Line_1: A for apple Line_2: B for Boy Line_3: C for Cat Suppose the SQL database with the required table is in place, How can I read from this text file and record it into the database using the following Code: Const adOpenStatic = 3 Const adLockOptimistic = 3 Const adUseClient = 3 Set objConnection = CreateObject("ADODB.Connection") Set objRecordset = CreateObject("ADODB.Recordset") objConnection.Open "DSN=WhatsUp;" objRecordset.CursorLocation = adUseClient <<<<<<<<<<< ---- Read from the text file ---- >>>>>>>> For Each Line in the file objRecordset.AddNew objRecordset("Line_1: ") = objSoundCard.SystemName objRecordset("Line_2: ") = objSoundCard.Manufacturer objRecordset("Line_3: ") = objSoundCard.ProductName objRecordset.Update Next objRecordset.Close objConnection.Close Any idea will be appreciated --- Thanks in advance. Tag: read & write to AD attribute added by exchange Tag: 174071
  - 19
    - Weird Scripting Issues (Virus or Hotfix issue?) Hi, Has anyone seen any problems where some scripts do not generate (or stop generating part way through) output. A "Msgbox" will for example not display and "wscript.echo", won't output to the console (CSCRIPT) or display a popup (WSCRIPT). This is on WINXP SP2. Thanks, Dennis Dennis Bareis [MVP] (dennis@KillSpam.dennisbareis.id.au) http://dennisbareis.id.au/index.htm Freeware Windows Installer creation tool (+ "ORCA automation"): http://dennisbareis.id.au/makemsi.htm Tag: read & write to AD attribute added by exchange Tag: 174066
  - 20
    - user account status Hello, In windows 2000 or xp, how do you determine if a user is admin or power user or normal user. Thanks a lot, -wcc Tag: read & write to AD attribute added by exchange Tag: 174049
  - 21
    - parsing xml I need some help parsing thorugh an xml file and then take the results and write to a formatted xml file. I made some effort. The xml sample is below. The purpose of xml defines all the property classes we want to pull data for. The code below actually grabs the property class. I don't know how to read the second argument(true/false) What I would like to happen is read all the classes but before continuing to get the values is validate wether or not I should get values based on the true or false argument. The purpose is to have all the properties availiable and decide what we actually want to grab. After validating if we should pull class data, I then need to look at each Property PName and determine if I should grab only certain pieces are everything based on the true/false. As I cycle through each Class and get data, I want to write that info to another xml file.(End of file with dummy values.) 'Main Sig() Function Sig() '************************************************************ ' Name: Sig ' Purpose: ' Inputs: None ' Returns: None '************************************************************ Const StoreXML_DROPOFF_DIR = "C:\" Const StoreXML_FileName = "NewXML.xml" Set objFSO = CreateObject("Scripting.FileSystemObject") Set xml = CreateObject("Microsoft.XMLDOM") XML.async = False XML.load StoreXML_DROPOFF_DIR & StoreXML_FileName Set classes = XML.selectNodes("//SIGInventoryData/Class") 'numNodes = nodeList.Length 'For i = 0 To nodeList.length -1 For Each pclass In classes className=pclass.Attributes.getNamedItem("CName").value Set myNode = pclass.selectSingleNode("Property") FindNodeValue = myNode.Text WScript.Echo (className) WScript.Echo(FindNodeValue) Next End Function ************************ Template xml file on what data to capture - Newxml.xml ************************ <SIGInventoryData> <Class CName="LCD" CInventory="True"> <Property PName="brightness" PInventory="True"/> <Property PName="backlight" PInventory="false"/> </Class> <Class CName="Audio" CInventory="True"> <Property PName="volumelevel" PInventory="True"/> </Class> </SIGInventoryData> ********************************************** The format of the xml file with data pulled from template xml. ********************************************** <Class CName="LCD"> <Property PName="brighness" Value="32"/> </Class> <Class CName="Audio"> <Property PName="volumelevel" Value="9"/> </Class> Tag: read & write to AD attribute added by exchange Tag: 174048
  - 22
    - how to use vbscript from ole control? I am programming on a third party language that does not have some of the built-in functionality (regexp) I need from vbscript I ran into trouble in setting eh language displID for the WSScript.Control Can some one show me? I try Google but no luck so far, the script56.chm did not help me either. I was not using the right search term Tag: read & write to AD attribute added by exchange Tag: 174046
  - 23
    - Setting the default saved file locations for Office 2003 My company has roughly 700 + users. We have Office 2003 pushed through GPO to all of the pc's. I want to make a script for word, excel, powerpoint and access to save at certain location. The script will be ran manually after the image and push have been performed. If you have any direction or ideas on this please feel free to help. Tag: read & write to AD attribute added by exchange Tag: 174044
  - 24
    - LDAP question I am trying to learn how to access AD objects using scripts and do not understand why I am getting the responses that I am seeing. The script is: Dim objDomain Set objDomain = GetObject("LDAP://dc=rcmt,dc=com") WScript.Echo objDomain.Get("pwdHistoryLength") WScript.Echo objDomain.Get("maxPwdAge") Set objDomain = Nothing The first echo works fine, telling me that the Password History is set to 3. However, the second echo (and almost every other attribute that I'm interested in) gives me a type mismatch error. I'm following examples from a scripting book and do not understand what I'm doing wrong. Any help would be greatly appreciated. Tag: read & write to AD attribute added by exchange Tag: 174043
  - 25
    - Get server-based printer list from clients I have a script that I run from a client, and I get all printers: local, IP based, server-based. If I run the same script from a server, I get the local and IP Based, but not server based. Does anyone have a script that will enumerate the printers on a remote machine that includes server based printers? Tag: read & write to AD attribute added by exchange Tag: 174042
- Next
  - 1
    - how to set script language on a script control 1. What is the proper dispIDmember name I can use to set the Language? The ones I used did not work. If I don't set language, I get --------------------------- Windows Script Host --------------------------- Script: c:\documetn and setting\smith\Local Settings\Temp\z.vbs Line: 11 Char: 1 Error: The operation could not be completed because the script engine has not been initialized to a valid language. Code: 80004005 Source: ScriptControl --------------------------- OK --------------------------- If I try settign the language with any of the names I used I get something like: --------------------------- Windows Script Host --------------------------- Script: c:\documetn and setting\smith\Local Settings\Temp\z.vbs Line: 10 Char: 2 Error: Object doesn't support this property or method: 'Language' Code: 800A01B6 Source: Microsoft VBScript runtime error --------------------------- OK --------------------------- For example: Dim objVbscript ' Dim is_ScriptControl = "MSScriptControl.ScriptControl" ' set objVbscript = CreateObject("VBScript.Control") set objVbscript = CreateObject("MSScriptControl.ScriptControl") ' works ' XX objVbscript.Language("VB Script Language") ' non of these 3 statemetns work ' objVbscript.Language("VBScript") ' objVbscript.Language("{B54F3741-5B07-11cf-A4B0-00AA004A55E8}") objVbscript.Reset() ' -------------------------------- end of test script -------------------- What I am trying to do to to debug the protocol so I can call the scirpt control from another programming language and use the script control to execute some vbscript. Do I really need reset()? If anyone has experience in this area, I will appreciate very much some samples or some pointers. Tag: read & write to AD attribute added by exchange Tag: 174041
  - 2
    - need script to automate creation of DFS I have a need for a user creation script. Let me explain. I am planning a migration from Novell to Microsoft. We are going to use DFS to help with our User's File access. So I need a script that will search each users group membership, then create a DFS Root for each user with DFS links to directories that the users Group has Permmisions to. For Example jim is a member of printing so the script would create a share Jim, then create a DFS root Jim, and a DFS link under Root Jim to \\server\Printing. I thought to use an exel speadsheet that would have the Groups name and the corresponding Folder to use as the DFS target. I have been able to find a few scripts to try to piece together but I thought that someone out there has either done this or wants to try. Thanks. Tag: read & write to AD attribute added by exchange Tag: 174040
  - 3
    - OpenDSObject - Why can't I connect to remote user object? OpenDSObject - Why can't I connect to remote user object? I am trying to use OpenDsObject to connect to a user object, then change the password. It works if the user object is in the same domain as my desktop logon, but not otherwise. This is the heart of the code. Any tips or tricks on using OpenDSObject for remote domains greatly appreciated! '***** SAMPLE CODE ***** sTarget = "LDAP://cn=Sample User,ou=Test,dc=domain,dc=com" sUsername = "sampleuser" sPassword = "XXXX" ADS_USE_ENCRYPTION = 2 Set oLDAP = GetObject("LDAP:") Set oAdObject = oLDAP.OpenDSObject(sTarget, sUsername, sPassword, ADS_USE_ENCRYPTION) oAdObject.ChangePassword sPassword, sNewPassword '***** END SAMPLE CODE ***** Tag: read & write to AD attribute added by exchange Tag: 174037
  - 4
    - VBScript Debug Symbols Could someone tell me how to get hold of the latest debug symbols for VBScript.dll? Thanks Tag: read & write to AD attribute added by exchange Tag: 174035
  - 5
    - Vbscript.pdb Could someone tell me how to get hold of the latest version of the public symbols for vbscript? Thanks Tag: read & write to AD attribute added by exchange Tag: 174034
  - 6
    - Vbscript.pdb Could sometime tell me how to get hold of the latest version of the public symbols for vbscript? Thanks Tag: read & write to AD attribute added by exchange Tag: 174033
  - 7
    - removing wins Can anyone tell me how to write a script to remove the wins settings on my networked pc's. thanks Andy Tag: read & write to AD attribute added by exchange Tag: 174031
  - 8
    - script for changing language options Hi! Is there a script for changing language specific options? I want to do it buy connecting a start script to an OU in AD. Or is there a better solution. My aim is to change the language on a computer when a specific user logs in. -- spitzer Tag: read & write to AD attribute added by exchange Tag: 174027
  - 9
    - Keyboard input? Hello All I'm trying to simulate a keyboard input of the letter "K" in my .vbs script. Any idea how to do this? Thank you, JB Tag: read & write to AD attribute added by exchange Tag: 174024
  - 10
    - How to refresh a Excel workbook with pivot & ADO query report in batch mode I have a Excel report which as a report populated from a ADO VBA code in a VBA subroutine which is driven from a button on the Excel workbook which the user presses to refresh. Also, I have some pivot reports on this workbook which is refreshed from a VBA subroutine called from a Excel button. Our users want this report to be refreshed in batch meaning they want the report to be refreshed overnight and saved on the network share that they can lookup the next morning without refreshing. I am wondering if the workbook is called TestReport.xls and it as a subroutine called RefreshAllReports please advise how to call this Subroutine - RefreshAllReports in the Excel workbook - TestReport.XLS from a VBScript from the operating system. Please advise how I can implement this kind of scenario appreciate if you can share the code to call a subroutine in a Excel workbook from a VBScript. Thanks Karen Tag: read & write to AD attribute added by exchange Tag: 174020
  - 11
    - How to parse a email with attachment- Miyahn please help Hi Miyahn The script works well on Lotus 5.x on Lotus 6.5 it does not recognise the Notes.Notessession I had to replace that by Lotus.Notessession and then set a Session.Initialise if I do not do this in Lotus 6 I get error in creating ActiveX error. When I put the above code the system expects me to provide a database name and also it prompts for a password I want to run this script in batch mode I do not want it to prompt for the password. Thanks Karen Tag: read & write to AD attribute added by exchange Tag: 174017
  - 12
    - ShellExecute fails to load & print microsoft products on XP!! (word/excel/powerpoint) I am writing some code in Java that launches a VBScript to initiate printing of selected files. Rather than write a custom bit of VB for each known application, I decided to use the ShellExecute function. The problem is, this works on my development machine (Win2K), but I cant get it to work on XP Home, XP Pro (SP1) or XP Home (SP2). STRANGELY, if I try to launch anything other than .doc, .ppt, .xls it seems to work! - Thanks Microsoft! ;-) Any suggestions? I dont think I can use the 'run' alternative, as that doesn't allow me to specify the 'print' parameter. FYI, typing test.doc in DOS or in the 'start->run' section DOES launch word, so I know the associations are ok. ATTEMPT 1: dim objShell, filesys, manifestFile, filetext set objShell = CreateObject("Shell.Application") objShell.ShellExecute "C:\test.doc", "", "", "print", 1 set objShell = nothing ATTEMPT 2: dim objShell, filesys, manifestFile, filetext set objShell = CreateObject("Shell.Application") CreateObject("Shell.Application")_ .Namespace(0)_ .ParseName("C:\test.doc")_ .InvokeVerb "&Print" set objShell = nothing Tag: read & write to AD attribute added by exchange Tag: 174016
  - 13
    - How to send a email with a attachment to Lotus Notes Torgeir This script again works fine on Lotus 5 on my a Lotus 6.5 system it prompts for my password and also it expects me to specify the database name. Please help how do I resolve this. Thanks Karen Tag: read & write to AD attribute added by exchange Tag: 174015
  - 14
    - Remotely searching for files Thanks Torgeir Bakken for your help. I finally figured it out and i been a big help. Torgeir Bakken \(MVP\) wrote: > *nnanna wrote: > > Thanks for the script Torgeir Bakken. > > I modified it and was getting access denied on Line 45. > > Any ideas why? > Hi > > I assume that line 45 is the Set fStatusFile ... line in > this code block: > > ' Create status file > Set fStatusFile = oFSO.CreateTextFile(sStatusFile, _ > OverwriteIfExist, OpenAsASCII) > > > Be sure that you have write access to the path you have put in > the sStatusFile variable. > > > -- > torgeir, Microsoft MVP Scripting and WMI, Porsgrunn Norway > Administration scripting examples and an ONLINE version of > the 1328 page Scripting Guide: > [url]http://www.microsoft.com/technet/scriptcenter/default.mspx[/url > - nnann ----------------------------------------------------------------------- Posted via http://www.codecomments.co ----------------------------------------------------------------------- Tag: read & write to AD attribute added by exchange Tag: 174014
  - 15
    - How to parse a email with attachment- Miyahn please help Hi Miyahn Thanks again for your prompt reply. Please note the code you have posted works fine on Notes 5.x when I use it against Notes 6.x it does not work. Please clarify what is HTA sorry for my ignorance how to use HTA. I would be thankful if you could help me in getting the code you posted to work with Notes 6 Thanks Karen Tag: read & write to AD attribute added by exchange Tag: 174013
  - 16
    - Linking login scripts in VBS Hi I would like do have a common loginscript and in that script link to other scripts according to e.g. the membership to an AD group. Could be like this in pseudo <<Common login script map common network drives distribute common templates and documents if memberOF("technicians1") then runscript("tech1.vbs") else if memberOF("technicians2") then runscript("tech2.vbs") if memberOF("admin") then runscript("admin.vbs") etc. Is there an example somewhere? TIA Henry Tag: read & write to AD attribute added by exchange Tag: 174010
  - 17
    - Read Account Details From Outlook Profile In Registry Hello everyone, I am trying to read the Outlook 2000/XP account details from the registry using VBScript (WSH specifically), so I can then import the information into an asset management tool. The script below works perfectly for Outlook Express, but for Outlook the values are stored as reg_binary, and when I run the script I only get the binary string returned (or more often a whole bunch of frustrating errors!!!) In my case, the Outlook profile date is stored in: HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Microsoft Outlook Internet Settings\9375CFF0413111d3B88A00104B2A6676\00000006 Could someone please show me how to transform the binary string values into a text string similar to the script below? I have spent about a week trying all sorts of code from just about every source and none of it works!!! From searching on the web I have noticed a lot of people trying to do the same thing and failing, so it would be great to finally have a solution!! Many, many thanks in advance, and I hope you all have a nice day! David ' *********** BEGIN CODE ' Code originally by Michelle Hillard (mhillard@craized.tv) ' Many thanks Michelle! dim key,defaultAccount,emailAddress Dim WSHShell Set WSHShell = CreateObject("WScript.Shell") on error resume next key="HKEY_CURRENT_USER\Software\Microsoft\Internet Account Manager\" defaultAccount=WSHShell.RegRead (key & "Default Mail Account") If err<>0 Then MsgBox "Email Settings Not Found!" else emailAddress=WSHShell.RegRead (key & "Accounts\" & defaultAccount & "\SMTP Email Address") emailName=WSHShell.RegRead (key & "Accounts\" & defaultAccount & "\SMTP Display Name") pop3uname=WSHShell.RegRead (key & "Accounts\" & defaultAccount & "\POP3 User Name") SMTPServer=WSHShell.RegRead (key & "Accounts\" & defaultAccount & "\SMTP Server") POP3Server=WSHShell.RegRead (key & "Accounts\" & defaultAccount & "\POP3 Server") 'MessageText="Your Default Email Address is " & emailAddress & " (" & emailName & ")" 'MsgBox MessageText wscript.echo emailAddress wscript.echo emailName wscript.echo pop3uname wscript.echo SMTPServer wscript.echo POP3Server end if ' ********* END CODE Tag: read & write to AD attribute added by exchange Tag: 174009
  - 18
    - MsgBox Help for Newbie (Isn't it always) Please help a scripting newbie as I can't get my head around (I would guess) a simple concept. I want to run a script that when runs, displays a MsgBox with the users logon name. Ive worked this out Set oShell = CreateObject("WScript.Shell") MsgBox oShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\Currentversion\Winlogon\DefaultUserName") What I want to do is simply add a few values under this output. For example "You agree to use this network" and "Dont dissapoint me" ;-) Using the & vbCrlf "value here" appended to the above just doesn't work. What am I missing? Seriously, I would love a pointer on this before I get straightjacketed. Thanks, Jonce. Tag: read & write to AD attribute added by exchange Tag: 174004
  - 19
    - Thumbnail Hi all. Is possible, using VBScript, reading a width and heigth property of one image? thank's Emanuel Tag: read & write to AD attribute added by exchange Tag: 174002
  - 20
    - How to parse a email with attachment- Miyahn please help Hi Miyahn Many thanks for your code. But this does not work on Lotus 6 not sure what Lotus COM objects have changed it says it cannot create ActiveX components I did regsv on various notes components does not work. The above code work on Lotus5 not on 6 appreciate your help if you could resolve to get it to run on Lotus 6 Thanks Karen Tag: read & write to AD attribute added by exchange Tag: 173991
  - 21
    - More Scripting Questions First off, thanks to everyone for helping a newbie out. I've learned alot as I go along. I've got two more questions for the group: 1. My script calls a batch file and then after it I want it to pull up a msgbox saying it's done. The problem is that as soon as the batch file starts, the msgbox pops up. How can I get the script to pause until the batch file is complete? I've temporarily used the sleep command to estimate how long it takes now, but as time goes on, the batch file will take longer and longer and I would have to keep changing the sleep setting. Here's the code: set objshell=createobject("WScript.Shell") objshell.run "batchfile.bat" wscript.sleep 17000 msgbox("Scan Complete.") 2. My script winds up creating two text files and compares them to see if they are the same or different. Is there any command or method to discern exactly what's different about the files? Like the diff command in UNIX? Tag: read & write to AD attribute added by exchange Tag: 173988
  - 22
    - log file script Any chance someone can help me out wih a script? I need the script to look in a text file for a server name, connect to the server, check the size of the application security and system log files, if it is over a certain size copy it to another directory, then clear the log. After that, go back to the list of servers and do it for the next one. Thanks -- h22hatch ------------------------------------------------------------------------ Posted via http://www.codecomments.com ------------------------------------------------------------------------ Tag: read & write to AD attribute added by exchange Tag: 173980
  - 23
    - Script to uninstall software Hello, Please post a script how to uninstall software from computer. Software is McAfee Antivirus Thanks Tag: read & write to AD attribute added by exchange Tag: 173978
  - 24
    - Locate where user is logged on probbbbably a dumb question! but is it possible to find/get the computer name where a particular user is logged in or find out who is logged in on a particular computer. tia *** Sent via Developersdex http://www.developersdex.com *** Tag: read & write to AD attribute added by exchange Tag: 173977
  - 25
    - How to verify a dll has been unregistered/registered Hi, I am trying to unregistered a dll on many servers via a script remotely. As a QA process how to remotely verify the dll has been unregistered sucessfully ? My command: regsrv32 /u /s name.dll Thanks, Wensi Tag: read & write to AD attribute added by exchange Tag: 173975

I'm trying to read and write to an AD attribute on the 'exchange features'
tab in vb script. I believe that this tab is added when Exchange 2003 is
installed. I am trying to read / write to the attribute that corresponds
to the 'OWA enabled' attribute, but I can't find it in AD. I've looked all
through the schema and ADSI Edit, but I don't see it. Does anyone out
there know what attribute that information is stored in?

RE: read & write to AD attribute added by exchange by v-kevy

v-kevy
Tue May 03 02:37:22 CDT 2005

Hi Mobzilla,

We have reviewed this issue and are currently researching on it. We will
update you ASAP. Thanks for your patience!

Kevin Yu
=======
"This posting is provided "AS IS" with no warranties, and confers no
rights."

RE: read & write to AD attribute added by exchange by Mobzilla

Mobzilla
Tue May 03 08:04:53 CDT 2005

v-kevy@online.microsoft.com (Kevin Yu [MSFT]) wrote in
news:uOQxNM7TFHA.2184@TK2MSFTNGXA01.phx.gbl:

> Hi Mobzilla,
>
> We have reviewed this issue and are currently researching on it. We
> will update you ASAP. Thanks for your patience!
>
> Kevin Yu
> =======
> "This posting is provided "AS IS" with no warranties, and confers no
> rights."
>
>

Thanks for the response. I have found that the information is stored in
'protocolSettings'. I can read the information just fine, but I'm
having a problem working with the data. When I output the vartype, it
says 8204, which is a variant array. For some reason, I'm not able to
split the array, or output the whole contents of the array. I'm not
able to do anything with the data. Is there something special that I
have to do to split the data from this attribute?

RE: read & write to AD attribute added by exchange by v-kevy

v-kevy
Wed May 04 01:12:48 CDT 2005

Hi Mobzilla,

To manipulate on the data for protocolSettings, you can take a look at the
following MSDN article and a KB article. They use the same example which
tells us how to split data from this attribute. HTH.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/e2k3/e2k3/_
clb_enumerating_exchange_object_properties_with_adsi_ado_vb.asp

http://support.microsoft.com/?kbid=252459

Kevin Yu
=======
"This posting is provided "AS IS" with no warranties, and confers no
rights."