English 中文(简体)
ConvertingactiveDs.Large Integer to Long in VB.net?
原标题:Converting ActiveDs.LargeInteger to Long in VB.net?

我试图计算密码的过期日期,其中多数实例是C#。

有一个样本:

IADsLargeInteger largeInt;
largeInt = (IADsLargeInteger) largeIntVal;   
myLong = (long)largeInt.HighPart << 32 | (uint)largeInt.LowPart;

如果我在VB.net尝试类似的话:

dim myLong as Long
myLong = largeInt.HighPart << 32 Or largeInt.LowPart

之后,我似乎获得了无效的价值。 我如何在VB中获得类似结果?

问题回答

this 问题在于VB。 网上没有未签名的分类。

解决办法是:

props = resultDE.Properties("pwdLastSet")
Dim prop As ActiveDs.LargeInteger
prop = props(0)

Dim int64Value As Long
Dim strTemp As String
strTemp = "&H" + CStr(Hex(prop.HighPart)) + CStr(Hex(prop.LowPart))
int64Value = Val(strTemp)




相关问题
Is Shared ReadOnly lazyloaded?

I was wondering when I write Shared ReadOnly Variable As DataType = New DataType() Or alternatively Shared ReadOnly Variable As New DataType() Is it lazy loaded or as the instance initializes? ...

Entertaining a baby with VB.NET

I would like to write a little application in VB.NET that will detect a baby s cry. How would I get started with such an application?

Choose Enter Rather than Pressing Ok button

I have many fields in the page and the last field is a dropdown with list of values. When I select an item in a dropdown and press Enter, it doesn t do the "Ok". Instead I have to manually click on Ok ...

ALT Key Shortcuts Hidden

I am using VS2008 and creating forms. By default, the underscore of the character in a textbox when using an ampersand is not shown when I run the application. ex. "&Goto Here" is not ...

Set Select command in code

On button Click I want to Set the Select command of a Gridview. I do this and then databind the grid but it doesn t work. What am i doing wrong? protected void bttnView_Click(object sender, ...

Hover tooltip on specific words in rich text box?

I m trying to create something like a tooltip suddenly hoovering over the mouse pointer when specific words in the richt text box is hovered over. How can this be done?

热门标签