2010-09-08 89 views
0

我有这个,我已经摆弄它一段时间,但我完全卡住了。任何人都可以帮助我对此有所了解。我试图把这个改写成.NET。谢谢。vb6转换为.NET。我卡住了

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") 
      .... 
+1

我相信你不希望我们为你做你的工作。你为什么不告诉我们你得到了什么,所以我们可以帮助你解决你遇到的具体问题? – 2010-09-08 18:46:49

回答

3

沿着这些方向的东西应该让你朝着正确的方向前进。您需要为 添加参考System.Configuration

using System.Data.SqlClient 
using System.Configuration 

SqlConnection sqlConn = null; 
SqlCommand sqlCmd = null; 
SqlDataReader sqlRdr = null; 

try 
{ 
    // get connection string from web.config or app.config 
    sqlConn = new SqlConnection(ConfigurationManager.ConnectionStrings["SomeConnectionString"].ConnectionString); 
    sqlConn.Open(); 

    sqlCmd = new SqlCommand("sp_CheckUserLogin", sqlConn); 
    sqlCmd.CommandType = System.Data.CommandType.StoredProcedure; 
    // define parameters like this 
    sqlCmd.Parameters.Add(new SqlParameter("@user", strUserName)); 
    sqlRdr = sqlCmd.ExecuteReader(); 
    while (sqlRdr.Read()) 
    { 
     // get values by column name or index 
     strPassword = sqlRdr["USER_NUMBER"].ToString(); 
    } 
catch(Exception ex) 
{ 
    // do your error handling here 
} 
finally 
{ 
    // close connections 
    if (sqlConn != null) 
     sqlConn.Close(); 
    if (sqlRdr != null) 
     sqlRdr.Close(); 
} 
0

objRS是一个RecordSet。 Here是VB6 ADO的一些提示。 Here是一个让你熟悉ADO.NET(VB6的ADO的.NET版本)的教程。

1

假设你连接到MS Sql Server,使用SqlCommand,SqlConnection和Dataset/DataTable类。如果您了解ADO,ADO.Net不会太难理解。