Querying Active Directory using VBScript

To look at all the members of an OU, try this… Set objOU = GetObject(“LDAP://OU=YourOU,DC=YourDomain,DC=com”) For each objMember in ObjOU ‘ get all the members’ ‘ do something’ Next To do a custom search for DNs try this… set conn = createobject(“ADODB.Connection”) Set iAdRootDSE = GetObject(“LDAP://RootDSE”) strDefaultNamingContext = iAdRootDSE.Get(“defaultNamingContext”) Conn.Provider = “ADsDSOObject” Conn.Open “ADs Provider” … Read more

ADODB.Recordset error ‘800a0bb9’ : Arguments are of the wrong type

The most like cause is that you haven’t included “ADOVBS.INC” or the equavalent META:- <!–METADATA TYPE=”TypeLib” NAME=”Microsoft ActiveX Data Objects 2.6 Library” UUID=”{00000206-0000-0010-8000-00AA006D2EA4}” VERSION=”2.6″ –> Hence the adxxxx constants do not exist. However your primary mistake is not including Option Explicit at the top your script. This will save you bucket loads of time hunting … Read more

How do I properly instantiate 32-bit COM objects in classic ASP after installing Windows Update KB4340558?

We were affected with multiple customers too. I ruled out invalid strong-name signing of our assemblies, since the .NET Assemblies from the Framework itself were affected by that access-denied error too. Finally I managed to solve the issue by configuration. Apparently the authenticating identity of the website has now to match the identity of the … Read more

How to upload files with asp-classic

long time since I’ve done that but we used an upload without third party components, just two vbscript classes (solution credit goes to Lewis Moten). It looks like you can still find this “Lewis Moten solution” in the wild If you include the clsUpload file, further upload process is as simple as: Dim objUpload Dim … Read more