調用資料庫代碼
Ⅰ 如何調用資料庫中的數據
你先你的程序上添加Activex data object Library 控制項然後你可以連接資料庫， 連接資料庫的時候你要用connection ixiang
我給你寫連接資料庫的代碼
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;
這個語句通過連接資料庫
C:\mydatabase.mdb
這個地址你自己換你資料庫文件保存的地址。
好好學習好好努力
Ⅱ 網頁製作——如何實現調用資料庫
首先，頁面1中用表單提交數據你要查詢的數據
代碼參考：<form action="對應的servlet類" metohd="post" name="form1">
接著，建立一個selvet類，繼承HttpServlet，在selvet類的doPost()方法里寫入查詢資料庫的代碼，主要利用request來獲取頁面1中的參數，通過reponse來給頁面2傳輸資料庫查詢的結果
代碼參考：
Connection con=null;
Statement stmt=null;
ResultSet rs=null;
String name=request.getParameter("name");
Class.forName("oracle.jdbc.driver.OracleDriver");
con = DriverManager.getConnection( "jdbc:oracle:thin:@localhost:test1", "test","stst");
stmt = conn.createStatement();
rs = stmt.executeQuery("select ename,empno,deptno from emp where empno like \'"+name+"');
reponse.setContentType("text/html;charset=GB2312");
PrintWriter out=response.getWritertr();
out.println("<html> <body>");
out.print("<table border>");
out.print("<tr><td colspan=8 align=center>用戶數據</td></tr>");
out.print("<tr>");
while(rs.next)
{
our.print("<tr>");
our.print("<td>"+rs.getString("ename")+</td>);
our.print("<td>"+rs.getString("emono")+</td>);
our.print("<td>"+rs.getString("depno")+</td>);
our.print("</tr>");
}
out.print("</tr>");
out.print("</table>");
out.print("</body> </html>");
out.close();
rs.close();
stmt.close();
con.close();
Ⅲ VB怎麼調用資料庫數據
VB可將sql結構化查詢語句賦值Ado(ActiveX 數據對象)或ADO Data 控制項，訪問和操作資料庫。
ADO (ActiveX 數據對象)，這項新的數據訪問技術的特性包括：更簡單的對象模型；與其它 Microsoft 和非 Microsoft 的技術更好的集成；為本地和遠程數據數據提供的通用介面；可遠程訪問的和斷開的記錄集；用戶可訪問的數據綁定介面；以及層次結構的記錄集。
ADO Data 控制項， 這是一種新的、OLEDB 識別的數據源控制項，其功能與內部的 Data 控制項和 Remote Data 控制項十分相似，通過這種方式允許用戶用最少的代碼來創建資料庫應用程序。
Visual Basic 6.0 中，已經可以將任何 ADO/OLE DB 數據源綁定到任何 ADO/OLE DB 數據使用者上。在運行時，可以設置控制項的 DataSource 屬性來將控制項動態地綁定到數據源。可以創建用作數據源和數據使用者的類，並且通過新的 BindingsCollection 對象將這些類綁定在一起。可以創建與 ADO 數據控制項相似的、用作數據源的用戶控制項。還可以創建與 DataGrid 控制項相似的、復雜綁定的用戶控制項。
以下是經ADO (ActiveX 數據對象)訪問Access資料庫的實例代碼：
DimcnnAsNewConnection
DimrsAsNewRecordset
DimsqlAsString
DimARR
cnn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:wdOld.mdb;PersistSecurityInfo=False"
sql="select故障名稱fromguzhang_bm"
rs.Opensql,cnn
Combo1.Text="故障名稱"
DoWhileNotrs.EOF
Combo1.AddItemrs("故障名稱")
rs.MoveNext'打開表
Loop
rs.Close
cnn.Close
以下是使用ADO Data 控制項訪問Access資料庫德實例代碼：
Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&App.Path&"wd.mdb;PersistSecurityInfo=False"
Adodc1.RecordSource="select*fromjishijilu"'whereshijianlike'%8112%'Andgyh_riqilike'%10%'"
Adodc1.Refresh
SetMSHFlexGrid1.DataSource=Adodc1
MSHFlexGrid1.Row=1
MSHFlexGrid1.ColSel=MSHFlexGrid1.Cols-1