http://itknowledgeexchange.techtarget.com/itanswers Sat, 25 May 2013 15:43:48 +0000 en-US hourly 1 http://itknowledgeexchange.techtarget.com/itanswers/conversion-of-function-vb-into-vbnet/ http://itknowledgeexchange.techtarget.com/itanswers/conversion-of-function-vb-into-vbnet/#comments Thu, 06 Nov 2008 08:22:48 +0000 9322319124 how i can convert below vb function into vb.net
Public Function FChkUserLoggedIn(LoginId As Long) As Boolean
Dim rs As ADODB.RecordSet, strsql As String
Set rs = New ADODB.RecordSet
‘strSql = “select msession from log where msession in (select msession from log where loginid = ” & LoginId & ” and form = ‘menu’ and active) and msession not in (select msession from log where loginid = ” & LoginId & ” and form = ‘menu’ and not active)”
strsql = “select * from log where form=’menu’ and active and loginid = ” & LoginId
If rs.State = 1 Then rs.Close
rs.open strsql, cnComp, adOpenStatic, adLockReadOnly
If rs.EOF Then
FChkUserLoggedIn = False
Else
FChkUserLoggedIn = True
End If
If rs.State = 1 Then rs.Close
Set rs = Nothing
End Function

]]> http://itknowledgeexchange.techtarget.com/itanswers/conversion-of-function-vb-into-vbnet/feed/ 0