2 svar · 309 visningar · startad av P
Nytt forum! Coolt!
Har en snutt kod som ser ut så här:
Public Shared Function AddUser(ByVal strUserName As String, ByVal strEmail As String, ByVal strPassword As String, ByVal intRoleID As Integer, ByVal intSysId As Integer)
Dim objData As New SecurityDB()
objData.AddUser(strUserName, strPassword, strEmail)
' Get the UserId
Dim dsUserID As DataSet
dsUserID = objData.DoLogin(strUserName, strPassword, intSysId)
Dim intUserId As Integer = dsUserID.Tables(0).Rows(0)("UserID")
objData.AddUserToRole(intUserId, intRoleID) '*
End Function
Problemet: no row at position 0 etc
Kollar i databasen, den nya användaren har lagts till. Så är det någon form av buffer i databasen som ekeverar hela sidan och sen lägger in värderna eller kan man använda sig av data som har lagts till tidigare i "klassen" ?
/Red: Byter jag ut intUserId i insert satsen (*) mot tex 12 så funkar det perfa! Hör väl inte till saken kanske....
Din kolumn kanske inte heter UserID i datatablet?
Jag vet inte hur sin select ser ut, men du kanske bara hämtar UserID? I så fall kan du ju skriva
Dim intUserId As Integer = dsUserID.Tables(0).Rows(0).Items(0)
Men när du debuggar, vad har du för värde från dsUserID.Tables(0).Rows(0).Items("UserID") ?
Lycka till!
Ahh kom på felet. Gjorde en select sats med värden som skulle sättas in, typ.
Hur gör man när man debbuggar? Finns det någon guide någonstans?
