Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
  		RegistrierenRegistrieren  LoginLogin

Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
kevinjo
Newbie
Newbie

Anmeldedatum: 14.10.2009
Beiträge: 1
Win7 - VB6 - Computername setzen
Verfasst am: 14.10.2009, 08:09
Hi,

scheinbar läuft mein Tool nicht mehr auf Win7. Ich habe bisher den Computernamen über die Kernel32 Lib gesetzt. Scheint nicht mehr zu laufen. Jetzt versuche ich mich an der WMI und der Klasse "Win32_ComputerSystem". Die Methode "rename" gibt den fehlercode "5" bzw. "242" zurück. Was kann ich tun?

Schlichtes Beispiel aus dem MSDN:




Code:
Name = "name"
Password = "password"
Username = "username"

Set objWMIService = GetObject("Winmgmts:root\cimv2")

' Call always gets only one Win32_ComputerSystem object.
For Each objComputer in _
    objWMIService.InstancesOf("Win32_ComputerSystem")

        Return = objComputer.rename(Name,Password,Username)
        If Return <> 0 Then
           WScript.Echo "Rename failed. Error = " & Err.Number
        Else
           WScript.Echo "Rename succeeded." & _
               " Reboot for new name to go into effect"
        End If

Next


Wie auch immer: Unter nem 32 Bit Vista schnuckelts. Könnte tatsächlich an der 64 Bit Version von Win7 liegen.

Was muss ich beachten?
_________________
 
VB-Coder
Newbie
Newbie

Anmeldedatum: 19.10.2009
Beiträge: 10

Verfasst am: 19.10.2009, 11:19
objWMIService.InstancesOf("Win32_ComputerSystem")

Es könnte nicht nur an nem 32bit Computersystem liegen - es liegt daran Wink
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: win7, vb6, computername, bit, getobject

  
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge [suche] Tuturials winsock & daten senden 869 09.06.2011, 12:19
Keine neuen Beiträge [Video] *.dll & *.ocx Installer 2432 06.03.2008, 20:19
Keine neuen Beiträge ListView speichern & laden 1242 05.08.2008, 12:32
Keine neuen Beiträge Registry & Co Fragen 1101 03.05.2007, 09:57
Keine neuen Beiträge Listbox speichern & laden 2047 22.03.2007, 20:25
 




[ Time: 0.1514s ][ Queries: 85 (0.0232s) ][ GZIP on - Debug on ]