Did some conversion for SQL Server..

code:
;http://www.able-consulting.com/MDAC/ADO/Connection/ODBC_DSNLess.htm#ODBCDriverForSQLServer
$DSN="Driver={SQL Server};"
$DSN=$DSN+"Server=SQLSERVER;"
$DSN=$DSN+"Database=Logins;"
$DSN=$DSN+"Uid=;"
$DSN=$DSN+"Pwd="

Cannot find :ADO_Error.
code:
If @ERROR <> 0
Goto ADO_Error
Endif

Also, you need to add in WMIQUERY() UDF.

Run the code and get the following:
quote:

Create Connection object 0: The operation completed successfully.
Create Command object 0: The operation completed successfully.
Create recordset object 0: The operation completed successfully.
Open connection 0: The operation completed successfully.
Open user recordset 0: The operation completed successfully.
Update users -2147352567: COM exception error "Value" (Microsoft OLE DB Provider
for ODBC Drivers - Multiple-step OLE DB operation generated errors. Check each
OLE DB status value, if available. No work was done.) [-2147352567/80020009]

It is working as I am getting a record created in TBL_USERS.

For the SQL Server folks (may need some tweaking with the DataTypes) pardon the long lines-
code:
CREATE TABLE [dbo].[tbl_Computers] (
[PCID] [int] IDENTITY (1, 1) NOT NULL ,
[Workstation] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[NTDomain] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[SystemManufacturer] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[SystemModel] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[SerialNo] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[OS] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[ServicePack] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[PhysicalMemory] [int] NULL ,
[ProcessorSpeed] [int] NULL ,
[PagefileSpace] [float] NULL ,
[DiskController] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[VidMode] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[VidCard] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Modem] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[LoggedOnUser] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[LastUpdate] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_Disks] (
[compID] [int] IDENTITY (1, 1) NOT NULL ,
[DriveName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[FreeSpace] [float] NULL ,
[TotalSpace] [float] NULL ,
[Format] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_MappedDrives] (
[UserID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[Letter] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Path] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_NetworkAdapters] (
[compID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[DeviceID] [int] NULL ,
[NetCard] [ntext] COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[IPAddress] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[MACAddress] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[DHCP] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_PrinterConnections] (
[compID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[PrinterID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[DriverName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[PortName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Description] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_Printers] (
[ID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[PRINTER NAME] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[DESCRIPTION] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[SERIAL NUMBER] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[IP ADDRESS] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[PORT] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[TAG NO] [int] NULL ,
[STATUS] [nvarchar] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_Shares] (
[compID] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[ShareName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[SharePath] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Description] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[ShareType] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Hyperlink] [ntext] COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO

CREATE TABLE [dbo].[tbl_Users] (
[UserID] [int] IDENTITY (1, 1) NOT NULL ,
[UserName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[FullName] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Workstation] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[IsLocalAdmin] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[PrivilegeLevel] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[HomeDrive] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[LastUpdate] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[Description] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO

HTH,

Kent

[ 03. November 2003, 20:03: Message edited by: kdyer ]
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's