Convert vb to c#

jesper

i will like to ask if anyone can convert this simple vb script to c# :i im a beginner so it would be nice to have an example.

strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set objNewPort = objWMIService.Get _ ("Win32_TCPIPPrinterPort").SpawnInstance_ objNewPort.Name = "IP_10.10.10.113" objNewPort.Protocol = 1 objNewPort.HostAddress = "10.10.10.113" objNewPort.PortNumber = "9100" objNewPort.SNMPEnabled = False objNewPort.Put_ Set objPrinter = objWMIService.Get("Win32_Printer").SpawnInstance_ objPrinter.DriverName = "HP LaserJet 4000 Series PS" objPrinter.PortName = "IP_10.10.10.113" objPrinter.DeviceID = "FrontOffice" objPrinter.Network = True objPrinter.Put_
//Thanks :)

5 Replies

Know the answer? Post it — somebody with the same question will find it here.

Vulpes14y ago
Accepted answer
See if the insertion of the highlighted lines when defining the PutOptions will make the error go away:

PutOptions portPutOptions = new PutOptions();
portPutOptions.Type = PutType.UpdateOrCreate;
portPutOptions.UseAmendedQualifiers = true;
newPort.Put(portPutOptions);

// ...

PutOptions printerPutOptions = new PutOptions();
printerPutOptions.Type = PutType.UpdateOrCreate;
printerPutOptions.UseAmendedQualifiers = true;
printer.Put(printerPutOptions);
0
jesper14y ago
Thank you that really help.. its correct that it has no compilation errors. but when i run it in debugging mode it comes with an error:

"An amended object cannot be put unless WBEM_FLAG_USE_AMENDED_QUALIFIERS is specified"

Any solutions ? /;
0
Vulpes14y ago
The translator converts VB.NET to C#, whereas your code is VBScript - hence the syntax error.

I can't promise that it will work but try this:

using System.Management;

// ....

ConnectionOptions connOptions = new ConnectionOptions();
connOptions.Impersonation = ImpersonationLevel.Impersonate;
string computer = ".";
ManagementScope scope = new ManagementScope(@"\\" + computer + @"\root\cimv2", connOptions);
scope.Connect();

ObjectGetOptions portGetOptions = new ObjectGetOptions(null, TimeSpan.MaxValue, true);
ManagementPath portPath = new ManagementPath("Win32_TCPIPPrinterPort");
ManagementClass portClass = new ManagementClass(scope, portPath, portGetOptions);
ManagementObject newPort = portClass.CreateInstance();
newPort["Name"] = "IP_10.10.10.113";
newPort["Protocol"] = 1;
newPort["HostAddress"] = "10.10.10.113";
newPort["PortNumber"] = 9100;
newPort["SNMPEnabled"] = false;
PutOptions portPutOptions = new PutOptions();
portPutOptions.Type = PutType.UpdateOrCreate;
newPort.Put(portPutOptions);

ObjectGetOptions printerGetOptions = new ObjectGetOptions(null, TimeSpan.MaxValue, true);
ManagementPath printerPath = new ManagementPath("Win32_Printer");
ManagementClass printerClass = new ManagementClass(scope, printerPath, printerGetOptions);
ManagementObject printer = printerClass.CreateInstance();
printer["DriverName"] = "HP LaserJet 4000 Series PS";
printer["Portname"] = "IP_10.10.10.113";
printer["DeviceId"] = "Frontoffice";
printer["Network"] = true;
PutOptions printerPutOptions = new PutOptions();
printerPutOptions.Type = PutType.UpdateOrCreate;
printer.Put(printerPutOptions);
0
jesper14y ago
i get a syntax error... line 1 col 1: EOF expected /:
0
Satyapriya Nayak14y ago
http://www.developerfusion.com/tools/convert/vb-to-csharp/
0