SCRIPT ASP Advapi on my Dell

http://www.motobit.com/help/scptutl/cm124.htm

Advapi - Logon and impersonate user

Set Advapi = CreateObject("ScriptUtils.Advapi") Response.Write Advapi.UserName Advapi.ImpersonateLoggedOnUser (Advapi.LogonUser("aa", "")) Response.Write Advapi.UserName Advapi.RevertToSelf Response.Write Advapi.UserName

Other links for ImpersonateLoggedOnUser

Methods of Advapi class

ImpersonateLoggedOnUser, LogonUser, RevertToSelf

Properties of Advapi class

UserName

ScriptUtils.Advapi

COM API for logon, impersonate and logoff user.

ScriptUtils

Huge ASP upload is easy to use, hi-performance ASP file upload component with progress bar indicator. This component lets you upload multiple files with size up to 4GB to a disk or a database along with another form fields. Huge ASP file upload is a most featured upload component on a market with competitive price and a great performance . The software has also a free version of asp upload with progress, called Pure asp upload , written in plain VBS, without components (so you do not need to install anything on server). This installation package contains also ScriptUtilities library. Script Utilities lets you create hi-performance log files , works with binary data , you can download multiple files with zip/arj compression, work with INI files and much more with the ASP utility.© 1996 - 2011 Anton


http://www.motobit.com/help/asp-dictionary-object/default.htm


Description of Multi Dictionary

Free-threaded (multithreaded) dictionary object. Lets you work with unique/non-unique keys in VBScript and JScript envinronment (share application/session variables in ASP) or any other programming language. You can share dictionary variables between processes or computers, you can save or restore dictionary variables to a disk, work with keys using regular expression and more.

Download

Current version 1.2

EXE setup - All Win32 versions - NT, Win XP, Vista, Win 7, Win 2003, Win 2008

Download Windows 32 EXE installer

ZIP package - All Win32/Win64/X64 (IA64,Amd64) - Win XP, Vista, Win 7, Win 2003, Win 2008

Download ZIP package (with installer inside)

License

Shareware About prices and registration

Features and functionality of Multi.Dictionary class

Main ideasFree-threaded hi-speed dictionary algorithm (better than Scripting.Dictionary, which is apartment threaded)Share dictionary values over processes/remote computers (from VBSCript in ASP to WSH, ..)Extended dictionary functionalityFeaturesUnique/nonunique keys (UniqueKeys, map/multimap).Connect to another dictionary object in the same process (Connect method).Extended Lock and Unlock methods to synchronize multithreaded tasks.Items and Keys enumerators.Bulk remove dictionary elements (using RemoveAll method).Bulk Save and Load dictionary data to/from a disk.Other functionalityShare Application/Session variables in ASP (see ASP - Share application variables sample)Share dictionary values over processes/remote computers (from VBSCript in ASP to WSH, ..)Works with keys collection using regular expression (Remove, Save …)Case sensitive or case insensitive keys

Using Dictionary class

How to use Dictionary class in VBA (VB5, VB6, Word, Excel, VBNet, …), VBS / JS (ASP, WSH).

Multi Dictionary, Scripting Dictionary and ASP application Dictionary - Performance comparison

Multi dictionary is designed also as a hi-speed dictionary working with large number of keys . This article provides test comparison between the Multi Dictionary and the two base object used in ASP - ASP global application object and Scripting.Dictionary.

Multi Dictionary classes

Dictionary Free threaded dictionary object. Lets you work with unique/non-unique keys, any VARIANT values and connect to other dictionary in the same process.

Multi Dictionary enums

CompareMethod Compare method for Dictionary keys.

Examples

Application scope dictionary in PHP

Enumerate Multi.Dictionary keys and items

Dim D As New Multi.Dictionary D.UniqueKeys = False 'Fill dictionary with some data D("Peter") = 12 D.Add "Alex", 2534 D.Add "Alex", 2535 D.Add "Alex", 14 Dim I As Long, Keys() 'Get dictionary Keys Keys = D.Keys 'Loop through Keys array For I = 0 To UBound(Keys) Debug.Print "Key", I, Keys(I) Next Dim Items() 'Get dictionary Items Items = D.Items 'Loop through Items array For I = 0 To UBound(Items) Debug.Print "Item", I, Items(I) Next ' output: Key 0 Alex Key 1 Peter Item 0 2534 Item 1 2535 Item 2 14 Item 3 12XML/PAD | All samples | Other libraries© 1996 - 2009 Antonin Foller, Motobit Software | About, Contacts | e-mail: info@pstruh.cz