VB脚本代码到VB.net代码 [英] VB script code to VB.net code

问题描述

有人可以在vb.net中转换此代码。我每次尝试很多但都失败了。

can some one please convert this code in vb.net. I tried alot but failure every time.

Dim colUpdate, oUpdate, iTHCount, oWU
            Dim strBuilder As New System.Text.StringBuilder
            ' creating com object
            oWU = CreateObject("Microsoft.Update.Searcher")
            iTHCount = oWU.GetTotalHistoryCount
            If iTHCount > 0 Then
                Dim dr As DataRow
                colUpdate = oWU.QueryHistory(0, iTHCount)
                For Each oUpdate In colUpdate
                    If oUpdate.ResultCode = 2 Then ' only succeeded updates
                        dr = dtUpdates.NewRow()
                        dr("Name") = oUpdate.Title.ToString.Trim
                        dtUpdates.Rows.Add(dr)
                    End If
                Next
            End If

提前感谢。

thanks in advance.

推荐答案

然后你应该尝试这个：

将VB脚本转换为VB.Net [ ^ ]

Then you should try this one:
Converting VB Script To VB.Net[^]

这篇关于VB脚本代码到VB.net代码的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！