各位大佬，本人對這個東西完全不懂，看了別人的代碼，嘗試著自己寫寫，好多錯誤，希望大家幫忙看看。
Imports dao
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str As String = "D:\d.mdb"
Dim Dbff As QueryDef
Dim RsFNFN As Parameter
Dim dbengine As New DBEngine
Dim G_db As Database
Dim RsS As Recordset
G_db = dbengine.OpenDatabase(str, False, False)
Dbff = G_db.CreateQueryDef("", "parameters RsFN TEXT;" & "select * from P安全閥 where [檔案名]=RsFN")
RsFNFN = Dbff.Parameters!RsFN
RsS = G_db.OpenRecordset("select * from P安全閥 ")
RsS!檔案名 = "FGFGDGDFGDGFDG" ‘這行顯示’屬性Field為readonly
End Sub
End Class
RsS!檔案名 = "FGFGDGDFGDGFDG" ‘這行顯示’屬性Field為readonly，該怎么改才能在“”檔案名“這個欄位下增加記錄呢？
” Dbff = G_db.CreateQueryDef("", "parameters RsFN TEXT;" & "select * from P安全閥 where [檔案名]=RsFN"),,,,,,,這句啥意思，是不是要增加啥陳述句，貌似沒地方對RSFN賦值么？
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/48484.html
上一篇：vb堆疊空間溢位
下一篇：VB.NET呼叫ACCESS