2009-04-27 31 views
1

我使用的代碼更新記錄以下行基於ROWID:這裏 dsmain,我使用的數據集....更新使用oracledataadapter

對於j = 2〜AuditGrid.Rows - 1

 If AuditGrid.ActiveCell.Row = j And AuditGrid.ActiveCell.Col = ColMark Then 
      Uvalue = Trim(AuditGrid.Cell(j, ColMark).Text) 
      da.UpdateCommand = New OracleCommand("update audit01 set user" & Trim(User) & "='" & Trim(Uvalue) & "' where audit01.rowid='" & Trim(AuditGrid.Cell(j, ColWRowid).Text) & "'") 
     End If 
    Next 

    da.Fill(DsMain, "AUDIT01") 
    da.Update(DsMain, "AUDIT01") 
    DsMain.AcceptChanges() 

問題是數據庫沒有被更新。該怎麼辦?

回答

0

我用下面的代碼行,現在工作完全沒有......

如果AuditGrid.ActiveCell.Row> 0,則

 Uvalue = Trim(AuditGrid.Cell(AuditGrid.ActiveCell.Row, ColMark).Text) 
     strQry = "update audit01 set user" & Trim(User) & "='" & Trim(Uvalue) & "' where rowidtochar(audit01.rowid)='" & AuditGrid.Cell(AuditGrid.ActiveCell.Row, ColWRowid).Text & "'" 
     da = New OracleDataAdapter(strQry, con) 
     da.Fill(DsMain) 
     DsMain.AcceptChanges() 
     MsgBox("Record Updated!!") 
     AuditGrid.Range(AuditGrid.ActiveCell.Row, ColMark, AuditGrid.ActiveCell.Row, ColMark).DeleteByRow() 
    End If