Ⅰ VB沒有為命令對象設置命令
你真是太粗心了，變數寫錯了。錯誤在此處：
-----------------------------------------
str1 = "select * from 用戶信息 where 用戶名='" & Text1.Text & "' and 密碼='" & Text2.Text & "' "
----------------------------------------
將上面的代碼變為如下就可以了：
++++++++++++++++++++++++++++++++++++++++
strsql= "select * from 用戶信息 where 用戶名='" & Text1.Text & "' and 密碼='" & Text2.Text & "' "
++++++++++++++++++++++++++++++++++++++++
建議你在以後的學習過程當中都在寫代碼之前加上：
Option Explicit
來檢測你的代碼中變數的聲明
Ⅱ 錯誤:ADODC:沒有指定記錄源[ADO]:沒有為命令對象設置命令
在程序設計時就可以設計DataGrid的記錄源（ADODC）了，而一開始需要設計ADODC的數據源，比如MDB文件
如果你要寫代碼
可以這樣寫：
Priavte sub form_load()
……
'已經設置好ADODC的數據源
set datagrid1.datasource=adodc1
……
end sub
Private Form_Unload(Cancel As Integer)
……
set datagrid1.datasource=nothing
……
End sub
現在只是解決控制項連接問題，我看「錯誤:ADODC:沒有指定記錄源[ADO]:沒有為命令對象設置命令」是對ADODC說的，請檢查ADODC的ConnectString連接字元串和確定ADODC的數據來源（表格，查詢等）——RecordSet屬性：
RecordSource 屬性（ADO Data 控制項）
返回或設置語句或返回一個記錄集的查詢。
語法
object.RecordSource [= value ]
RecordSource 屬性的語法包括下述部分：
部分 描述
Object 一個對象表達式，其值為「應用於」列表中的一個對象。
Value 一個字元串表達式，它指定了一個記錄源，如「設置值」中所描述的。
設置值
value 的設置值為：
設置值 描述
表名稱 一個資料庫表的名稱。
SQL 查詢 一個有效的 SQL 字元串，該字元串使用了適合於數據源的語法。
Ⅲ VB資料庫提示「沒有為命令對象設置命令」，求各位大神幫忙解決加分
strSql="select * from 姓名 where Name='"+Text1.text+"'"
Ⅳ 程序運行時出現「沒有為命令對象設置命令」，但從資料庫中可以看到只有表PatientECGand3D中沒有添加
strConn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON"
不知上句的字元串內容是否正確。sql資料庫的連接代碼我沒有，給ACCESS資料庫的連接代碼供參考：
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\hxrkgl.mdb;Persist Security Info=False"
你的其它代碼經調試未發現問題，正確運用了ADODB數據對象。但從你的敘述中看，你另外使用了ADODC數據控制項，是否是該功件的屬性設置有問題。
補充：
1)ADODC數據控制項作連接字元串正確後，如未指定數據表，運行會報錯，你可刪除該控制項，運行你的代碼不會有問題。
如果你是新建數據工程，VB會自行載入ADO數據對象。如果你是新建EXE工程，則應由工程菜單選引用選項，在其窗口選MICROSOFT ACTIVEX DATA OBJECTS 2.0 LIBRARY加鉤即可。不過建議按新建數據工程簡單。
2)我用以下代碼調試你的主要代碼，僅按新建EXE工程，則應由工程菜單選引用選項，在其窗口選MICROSOFT ACTIVEX DATA OBJECTS 2.0 LIBRARY加鉤，並添加DATAGRID部件，無問題，在VB6調試：
Private Sub Form_Load()
Dim strConn As String
Dim pubConn As New ADODB.Connection
Dim rsTable As New ADODB.Recordset
Dim strSQL As String
'strConn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON"
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\hxrkgl.mdb;Persist Security Info=False"
pubConn.Open strConn
rsTable.CursorLocation = adUseClient
strSQL = "select * from mdlk_sj"
'strSQL = "select * from attdcardrec"
rsTable.Open strSQL, pubConn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rsTable
End Sub
Ⅳ VB.net 沒有為命令對象設置命令
If database.BindingNavigator.BindingSource Is database.鑽孔數據表BindingSource
這是什麼東西，說明一下
database
Ⅵ access沒有為命令對象設置命令，
無法判斷你自定義的函數GetRs()是否能返回一個記錄集。這可能是問題發生的原因。
建議你用一個簡單的域合計函數作為判斷條件即可：
steSQL = "SELECT * FROM 管理員 WHERE 用戶名='" & Me.UserName & "'and密碼='" & Me.Password & ""
Set rs = GetRs(strSQL)
If rs.EOF Then
這段替換為：
if dcount("用戶名","管理員", "用戶名='" & Me.UserName & "' and 密碼='" & Me.Password & "'") >=1 then
Ⅶ VB6.0出現[ADODC]:沒有指定記錄源，[ADO]:沒有為命令對象設置命令問題，求大神解救。
DataSource屬性沒設置好，不要事先在屬性裡面設置為adodc
adodc的recordsource屬性 也要設置正確哈（很重要！！）
Ⅷ 用vb連接sql資料庫時總是提示:ADODC:沒有指定記錄源[ADO]:沒有為命令對象設置命令
strConn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON" 不知上句的字元串內容是否正確。sql資料庫的連接代碼我沒有，給ACCESS資料庫的連接代碼供參考：strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\hxrkgl.mdb;Persist Security Info=False"你的其它代碼經調試未發現問題，正確運用了ADODB數據對象。但從你的敘述中看，你另外使用了ADODC數據控制項，是否是該功件的屬性設置有問題。補充：1)ADODC數據控制項作連接字元串正確後，如未指定數據表，運行會報錯，你可刪除該控制項，運行你的代碼不會有問題。如果你是新建數據工程，VB會自行載入ADO數據對象。如果你是新建EXE工程，則應由工程菜單選引用選項，在其窗口選MICROSOFT ACTIVEX DATA OBJECTS 2.0 LIBRARY加鉤即可。不過建議按新建數據工程簡單。2)我用以下代碼調試你的主要代碼，僅按新建EXE工程，則應由工程菜單選引用選項，在其窗口選MICROSOFT ACTIVEX DATA OBJECTS 2.0 LIBRARY加鉤，並添加DATAGRID部件，無問題，在VB6調試：Private Sub Form_Load()Dim strConn As StringDim pubConn As New ADODB.ConnectionDim rsTable As New ADODB.RecordsetDim strSQL As String'strConn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON"strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\hxrkgl.mdb;Persist Security Info=False"pubConn.Open strConnrsTable.CursorLocation = adUseClientstrSQL = "select * from mdlk_sj"'strSQL = "select * from attdcardrec"rsTable.Open strSQL, pubConn, adOpenDynamic, adLockOptimisticSet DataGrid1.DataSource = rsTableEnd Sub
Ⅸ 求大神找錯，為什麼我的代碼運行後提示System.Data.OleDb.OleDbException: 沒有為命令對象設置命令。
string MyConnString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+Server.MapPath(".")+"F:\\student.mdb;" ;
這里錯了
應該這樣寫
string MyConnString = "Provider = Microsoft.jet.OLEDB.4.0; Data Source =" + Server.MapPath("相對路徑");
Server.MapPath這個裡面應該是寫相對路徑，他會返回伺服器上的絕對路徑
Ⅹ 求助VB高手！[ADODC]:沒有制定記錄源。[ADO]:沒有為命令對象設置命令。
編號是不是字元類型的，如果是，將
Adodc1.RecordSource
=
"select
*
from
庫存
where
編號
="
&
txtno.Text
改為
Adodc1.RecordSource
=
"select
*
from
庫存
where
編號
='"
&
txtno.Text
&
"'"