UpdateDB

用於更新開啟的資料庫內的已搜尋表格中之資料。

格式
UpdateDB #資料庫編號, 項目,值

參數

資料庫編號

用於指定以OpenDB指定的資料庫編號(501~508的整數值)。

項目

指定要更新的表格項目名稱。

值

指定要更新的值。

說明
按照指定的項目值更新處於開啟狀態的資料庫內之已選表格中資料。

務必在更新資料前執行SelectDB，並選擇要更新的記錄。

注意

---

需連接有安裝RC+的PC。

---

參照
OpenDB、CloseDB、SelectDB函數、DeleteDB

UpdateDB範例
使用SQL資料庫的範例

以下所示為在SQL服務器2000範例資料庫Northwind的表格Employees中註冊資料，並更新已註冊資料項目的簡易範例。

  Integer count, i, eid
  String Lastname$, Firstname$, Title$

  OpenDB #501, SQL, "(LOCAL)", "Northwind"
  count = SelectDB(#501, "Employees", "TitleOfCourtesy = 'Mr.'")
  Print #501, "Epson", "Taro", "Engineer", "Mr."
  count = SelectDB(#501, "Employees", "LastName = 'Epson' and 	FirstName = 'Taro'")
  Input #501, eid, Lastname$, Firstname$, Title$
  Print eid, ",", Lastname$, ",", Firstname$, ",", Title$
  UpdateDB #501, "Title", "Chief Engineer"
  count = SelectDB(#501, "Employees", "LastName = 'Epson' and 	FirstName = 'Taro'")
  Input #501, eid, Lastname$, Firstname$, Title$
  Print eid, ",", Lastname$, ",", Firstname$, ",", Title$
  CloseDB #501

使用Excel活頁簿的範例

以下示範一個從RC+8.0附屬的範例專案「DrawEpsonLogo」中的Excel活頁簿EPSON_LOGO.xls之LOGO工作表註冊資料，並更新已註冊資料的簡單範例。
有關範例中使用的Excel活頁簿，請參閱以下內容。
範例檔案

Integer count, p, x, y
String desc$

OpenDB #501, Excel, "C:\EpsonRC80\projects\Samples\Database\DrawEpsonLogo\EPSON_LOGO.xls"
count = SelectDB(#501, "[LOGO$]")
Print #501, "999", "222", "222", ""
count = SelectDB(#501, "[LOGO$]", "Point = 999")
UpdateDB #501, "Description", "EPSON"
count = SelectDB(#501, "[LOGO$]", "Point = 999")
Input #501, p, x, y, desc$
Print "Point", p, ", X:", x, ", Y:", y, ", Descripption:", desc$

'輸出結果
`Point 999, X: 222, Y: 222, Descripption:EPSON