Re: URGENT problem running remote process using WMI - Visual Basic Discussion Boards

NaliniNagarajan28-Jan-09 2:56

28-Jan-09 2:56

hi i developed one project in visual studio 2005..... worked under vb.net with ms access 2003..... i did my project successfully........ when i came to publish i have attached my database successfully........ during setup.exe running one error occur like this " could not find installable ISAM..... anyone help me for this query....

Re: could not find installable ISAM

Dave Kreskowiak29-Jan-09 3:14

Dave Kreskowiak

29-Jan-09 3:14

Most likely, your ConnectionString is wrong. What does the code look like that throughs the error.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

Problem running remote process using WMI [modified]

thecornflake28-Jan-09 2:07

thecornflake

28-Jan-09 2:07

Hi,

I urgently need to get this program running. I'm trying to remotely connect to a server using WMI (which is all fine) and then run an executable as a process on the server.

I currently get the error "Public member 'string' on type 'Uinteger' not found". I think this is something to do with the InvokeMethod line, as most examples have 'null' where it has 'Nothing'. However null is not allowed in VB.NET 2005 - it suggests using system.dbnull which doesn't work either.

 <br />
' Get the object on which the method will be invoked<br />
                    Dim processClass As New ManagementClass<br />
                    processClass = New ManagementClass("Win32_Process")<br />
                    processClass.Scope = scope<br />
                    ' Get an input parameters object for this method<br />
                    Dim inParams As ManagementBaseObject = processClass.GetMethodParameters("Create")<br />
                    ' Fill in input parameter values<br />
                    inParams("CommandLine") = patchcommand 'This is a string containing the command<br />
             <br />
<br />
                    ' Execute the method<br />
                    Try<br />
                        Dim outParams As ManagementBaseObject = processClass.InvokeMethod("Create", inParams, Nothing)<br />
                        Dim obj As Object = outParams("ReturnValue")<br />
<br />
                        'Check for an error<br />
                        If obj.ToString <> "0" Then<br />
                           'Error occurred<br />
                        End If<br />
                    Catch ex As Exception<br />
                        'This catches any other errors from trying to run the process<br />
                        MessageBox.Show(servername & " - Error running process - " & ex.Message & vbCrLf & ex.ToString)<br />
                       <br />
                    End Try<br />

modified on Wednesday, January 28, 2009 9:20 AM

Re: URGENT problem running remote process using WMI

EliottA28-Jan-09 2:55

EliottA

28-Jan-09 2:55

how urgent is it?

Re: URGENT problem running remote process using WMI

thecornflake28-Jan-09 3:09

thecornflake

28-Jan-09 3:09

I'd like to get it working today if possible. We're trying to roll something out urgently across a lot of servers and this way we can do it all remotely.

Re: URGENT problem running remote process using WMI

EliottA28-Jan-09 3:19

EliottA

28-Jan-09 3:19

Well just so you know, take a look at this [^]thread, it explains etiquette on the boards. Posts with urgent don't typically get responses at all, nor do posts looking for source code.

Re: URGENT problem running remote process using WMI

thecornflake28-Jan-09 3:21

thecornflake

28-Jan-09 3:21

Thanks. I've edited the title. I'm not looking for source code by the way, I just posted my code to show how I'm trying to do it.

I think the code is correct except for that one line being wrong in some way.

Re: URGENT problem running remote process using WMI

thecornflake28-Jan-09 4:32

thecornflake

28-Jan-09 4:32

I've changed the way I'm doing it now. I'm getting a return code of 9 but I can't seem to find out what these codes mean.

New code -

Dim processClass2 As ManagementClass = New ManagementClass("Win32_Process")
processClass2.Scope = scope
Dim inParams2 As ManagementBaseObject = processClass2.GetMethodParameters("Create")
Dim startup As ManagementClass = New ManagementClass("WIN32_ProcessStartup")
startup.Scope = scope
inParams2("CommandLine") = patchcommand
inParams2("ProcessStartupInformation") = startup
Dim outParams As ManagementBaseObject = processClass2.InvokeMethod("Create", inParams2, Nothing)


'Check for an error
If (outParams("ReturnValue").ToString) <> "0" Then
    'Add error to listview
    Dim itms1 As New Windows.Forms.ListViewItem.ListViewSubItem _
        (itmp, "Could not start process. Error code " & (outParams("ReturnValue").ToString))
    itmp.ForeColor = Color.Red
    itmp.SubItems.Add(itms1)
    itmp.Checked = True
    'Skip to next file
    GoTo skipfile
End If

Re: URGENT problem running remote process using WMI

Uros Calakovic28-Jan-09 5:29

Uros Calakovic

28-Jan-09 5:29

Win32_Process.Create returno codes are hidden here[^]

I suggest you check the contents of your patchcommand variable.

In January you said "Money in April" -
That was two years ago!

B. Python

Re: URGENT problem running remote process using WMI

thecornflake28-Jan-09 5:50

thecornflake

28-Jan-09 5:50

Thanks very much for the codes.

I'm not sure about the escape characters in the variable. It's set to -

patchcommand = " ""\\server\folder\folder\WindowsServer2003-KB958644-x86-ENU.exe "" /quiet"

And I want it to run "\\server\folder\folder\WindowsServer2003-KB958644-x86-ENU.exe" /quiet

I've tried it with \\\\server\\folder\\folder\\WindowsServer2003-KB958644-x86-ENU.exe which also seems to fail.

The usual error code that comes back is 9 now - I was getting 8 before I started mucking around with escape characters.

how to develop print dialog box

vidhish27-Jan-09 23:37

vidhish

27-Jan-09 23:37

hi all,
am using vb.net 2.0 how to develop print dialog

Regards

Vidhish

Re: how to develop print dialog box

dan!sh 28-Jan-09 0:04

dan!sh

28-Jan-09 0:04

There is a PrintDialog class. Use that.

Visual Studio has a great feature called Object Browser. Try using it.

The word "politics" describes the process so well: "Poli" in Latin meaning "many" and "tics" meaning "bloodsucking creatures."

जय हिंद

Help

yaya_star27-Jan-09 21:15

yaya_star

27-Jan-09 21:15

Im reading a file and taking a specific fields from it and then rewrite them in a new file.. some of these fields are empty so i need a code that when the fields is empty to write it in the new file as spaces

Re: Help

Ashutosh Phoujdar27-Jan-09 21:29

Ashutosh Phoujdar

27-Jan-09 21:29

Please try using this :

FileHelpers v2.0 - Delimited (CSV) or Fixed Data Import/Export Framework[^]

Read text file (txt, csv, log, tab, fixed length)[^]

Both are very good source for reading text files, I used 2nd options for same purpose before.

dnpro
"Very bad programmer"

My Latest Articles
RichTextBox Control with Find functionality
LogViewer - A Simple Log Listening Utility

ODBC

Stephen Lintott27-Jan-09 21:08

Stephen Lintott

27-Jan-09 21:08

Hi all. I am currently looking to insert a value into a memo field in vfp using a odbc connection but keep getting a error (ERROR [22018] [Microsoft][ODBC Visual FoxPro Driver]Data type mismatch). Does anybody know if this is supported by the odbc connection object or does anybody have sample code to do this. The sql is correct this thing just fails with the odbc connection.

Stephen Lintott Bsc IT (RAU)

Re: ODBC

Jay Royall27-Jan-09 22:37

Jay Royall

27-Jan-09 22:37

You say that the SQL is correct, what type of database have you tested it on? The reason I ask is because I believe that the required type of data can vary between database engines.

If you haven't done so already (and I apologise if you have), I would test the SQL on the VFP database directly.

Re: ODBC

Wendelius27-Jan-09 22:43

Wendelius

27-Jan-09 22:43

Could yo post the code. Perhaps the problem is in the parameter usage.

The need to optimize rises from a bad design.My articles[^]

Re: ODBC

Stephen Lintott28-Jan-09 1:31

Stephen Lintott

28-Jan-09 1:31

After a discusion with the developer in charge of this I found out that the following sql statement causes the break. If anyone can see why I would surely appreaciate it. I sure can't it seems correct to me.

INSERT INTO OrdHeader (Uniqueid,trantype,ledgerno,accountid,userno,entrydate,entrytime,lineno, trandate,periodno,batchno,internref,externref,hedgecode,logged,descriptn,payee,presented,held,previous,ositem,ledger2, account2,taxtype1,taxcode1,taxamount1,taxtype2,taxcode2,taxamount2,taxtype3,taxcode3,taxamount3,salescode,costcode,stage, branch,delivery,quantity1,quantity2,quantity3,amount1,amount2,amount3,amount4,amount5,cncycode,exchange,netvarnce,netgain, netloss,taxrebate,duedate,rateid,staffid,complqty,ppsrate,purchtype,isjobquote,rpsgross,recordno,temppres,changed,discperc, taxperiod,zcostproc,zpostatus) Values(5,49,2,'CNBPZF@CQU',1, CTOD('1/26/2009'),58694.616,0,CTOD('12/31/2008'),78, 356550,'PO-JAC01360         ','PO-JAC              ','N','F' ,'Purchase Order                                                                                                                                                                                                                                                 ','                                   ',0,'F','F' ,'F',2,'CNBPZF@CQU',' ',0,0 ,' ',0,-69.96,' ',0 ,0,0,'         0','         0',1 ,CTOD('12/31/2008'),0,0,0 ,-699.56,0,-699.56,0,0 ,0,1,0,0,0 ,0,CTOD('12/30/1899 12:00:00 AM'),'F          ','F          ',0 ,0,0,'F',0,0 ,0,'T',0,0,' ' ,' ')

Stephen Lintott Bsc IT (RAU)

Re: ODBC

Wendelius28-Jan-09 1:46

Wendelius

28-Jan-09 1:46

If you execute that directly against the database without your application, does it fail?

The need to optimize rises from a bad design.My articles[^]

Re: ODBC

Stephen Lintott28-Jan-09 2:56

Stephen Lintott

28-Jan-09 2:56

It fails when running it against a RBDMS. The booleans don't cause any havoc. It inserts to9 the Description field and then no more

Stephen Lintott Bsc IT (RAU)

Re: ODBC

Wendelius29-Jan-09 9:33

Wendelius

29-Jan-09 9:33

Since I don't know the structure of your table, I'm not able to sy if all the values are in correct places. However, you could check if the pairs match (if not done so already)

Here's the colum/value list in different format. The Descriptn value look quite large, perhaps it's over the max length?

Uniqueid            5	
trantype            49	
ledgerno            2	
accountid           'CNBPZF@CQU'	
userno              1	
entrydate           CTOD('1/26/2009')	
entrytime           58694.616	
lineno              0	
trandate            CTOD('12/31/2008')	
periodno            78	
batchno             356550	
internref           'PO-JAC01360         '	
externref           'PO-JAC              '
hedgecode           'N'
logged              'F' 
descriptn           'Purchase Order                                                                          
                                                                 
                                                  
                                                    '
payee               '                                   '
presented           0
held                'F'
previous            'F' 
ositem              'F'
ledger2             2
account2            'CNBPZF@CQU'
taxtype1            ' '
taxcode1            0
taxamount1          0
taxtype2            ' '
taxcode2            0
taxamount2          -69.96
taxtype3            ' '
taxcode3            0
taxamount3          0
salescode           0
costcode            '         0'
stage               '         0'
branch              1
delivery            CTOD('12/31/2008')
quantity1           0
quantity2           0
quantity3           0
amount1             -699.56
amount2             0
amount3             -699.56
amount4             0
amount5             0
cncycode            0
exchange            1
netvarnce           0
netgain             0
netloss             0
taxrebate           0
duedate             CTOD('12/30/1899 12:00:00 AM')
rateid              'F          '
staffid             'F          '
complqty            0
ppsrate             0
purchtype           0
isjobquote          'F'
rpsgross            0
recordno            0
temppres            0
changed             'T'
discperc            0
 taxperiod          0
zcostproc           ' ' 
zpostatus           ' '

The need to optimize rises from a bad design.My articles[^]

Re: ODBC

Ben Fair28-Jan-09 2:50

Ben Fair

28-Jan-09 2:50

I notice multiple booleans that appear as single character strings ('T' or 'F'). Are those
fields actually character type or boolean type? In VFP .T. and .F. are used to indicate
booleans. If you are using parameters for the ODBC command and assign a boolean value to them it should handle them for
you, but if you are specifying their values in the command text then you may need to use the VFP boolean syntax.

Hope in one hand and poop in the other; see which fills up first. Hope and change were good slogans, now show us more than words.

FindFile file type question

monsieur_jj27-Jan-09 19:26

monsieur_jj

27-Jan-09 19:26

Hi all,

I am new to vb and I am trying to get the file type of every file found during findfile here is my code:

iSearchHandle = FindFirstFile(SrcDir, pFindFileBuff)
    If iSearchHandle <> INVALID_HANDLE_VALUE Then

        strFile = TrimNull(pFindFileBuff.cFileName)
        Do While strFile <> ""
            Do While FindNextFile(iSearchHandle, pFindFileBuff)
            strFile = TrimNull(pFindFileBuff.cFileName)
            If strFile <> "." And strFile <> ".." Then
            strFile = strDir + "\" + strFile
            'strLen = Len(strFile)
            
            fileType = Right$(strFile, 4)

I tried using Right$ to get the file type for example "TonyRobertson.ppsx", ,"version2.5.0.doc", "IMIT031211_TonyRobertson.ppt" and "MARBLES.G4"

by using that I get ppsx, .doc, .ppt and S.G4, is there another way to get the right format?

Thanks,
Jj

Re: FindFile file type question

Ashutosh Phoujdar27-Jan-09 20:13

Ashutosh Phoujdar

27-Jan-09 20:13

Hope you are using VB6.
There are two options to get the file type e.g.
1. Split the filename using (.) dot character and get last element in array.
2. Use FileSystemObject, that provides a lot more options on file information. For more information : Click[^]

PS: If you are using VB.NET then there are lot of utility classes in System.IO Namespace[^]

dnpro
"Very bad programmer"

My Latest Articles
RichTextBox Control with Find functionality
LogViewer - A Simple Log Listening Utility

how to create line graph using C#

karthick sampangi27-Jan-09 18:59

karthick sampangi

27-Jan-09 18:59

Hi,
I'm trying to create linear graph using C# in windows application
please help me to solve this problem. D'Oh! | :doh:

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.