J'ai ceci, et j'ai été tripoter avec lui pendant un moment mais je suis complètement coincé. Quelqu'un peut-il m'aider à faire un peu de sens de cela. J'essaie de réécrire ceci en .NET. Merci.conversion vb6 en .NET. Je suis coincé
Set objCmd = Server.CreateObject("ADODB.Command")
Set objRS = Server.CreateObject("ADODB.Recordset")
objCmd.ActiveConnection = Application("ConnString")
With objCmd
.CommandText = "sp_CheckUserLogin"
.CommandType = adCmdStoredProc
objCmd(1) = strUserName
Set objRS = .Execute
End With
Set objCmd = Nothing
If objRS.EOF Then
strErrString = strErrString & "Invalid Account Information.<br>"
Call InsertLoginHistory(strUserName, Trim(Request.Form("Password")), Request.ServerVariables("REMOTE_HOST"), "User Not Found")
bLoggedIn = False
Else
iUserNumber = objRS("USER_NUMBER")
strPassword = Trim(objRS("USER_PASSWORD"))
strIPBand = Trim(objRS("IP_BAND"))
iFailedCount = objRS("FAILED_LOGIN_CNT")
dLastFailedLogin = objRS("LAST_FAILED_LOGIN")
strLoggedInStatus = objRS("LOGGED_IN_STATUS")
strLockUser = objRS("LOCKUSER")
....
Je suis sûr que vous ne voulez pas faire votre travail pour vous. Pourquoi ne nous montrez-vous pas ce que vous avez pour que nous puissions vous aider avec les points spécifiques pour lesquels vous avez des problèmes? –