直接这样写不就行了:
sqlStr="select * from tbEmp where EmpID = " & Text1.Text
或(EmpID是字符型时):
sqlStr="select * from tbEmp where EmpID = '" & Text1.Text & "'"例子(以Access数据库为例):
Dim conn As ADODB.Connection
Dim Rs As ADODB.Recordset
Dim SQLStr As String, SQLSelect As String
SQLStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\abc.mdb;"
Set conn = New ADODB.Connection
conn.ConnectionString = SQLStr
conn.Open
SQLSelect = "select H_ID from hycao where H_ID = " & Text1.Text
Set Rs = conn.Execute(SQLSelect, 1, adCmdText)
sqlStr="select * from tbEmp where EmpID = " & Text1.Text
或(EmpID是字符型时):
sqlStr="select * from tbEmp where EmpID = '" & Text1.Text & "'"例子(以Access数据库为例):
Dim conn As ADODB.Connection
Dim Rs As ADODB.Recordset
Dim SQLStr As String, SQLSelect As String
SQLStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\abc.mdb;"
Set conn = New ADODB.Connection
conn.ConnectionString = SQLStr
conn.Open
SQLSelect = "select H_ID from hycao where H_ID = " & Text1.Text
Set Rs = conn.Execute(SQLSelect, 1, adCmdText)
谢谢!!!
请再看清楚问题,你说的我已经这样用了,只是感觉不妥,才提这个问题的。我要求的是到数据库中,Oracle能够辨认出这样的SQL语句:select * from tbEmp where EmpID=:d_ID;
不是说这里有M$的技术顾问吗?不问也应该来光顾一下嘛!!!!!