以下的连接 mdb 数据库的连接字串怎么写呀

feeling 2003-10-17 04:25:42

引入
Imports System.Data.SqlClient
Imports System.Data

以下的连接 mdb 数据库的连接字串怎么写呀

Public cn As New SqlClient.SqlConnection
cn.ConnectionString =" " '这里不会写呀
cn.Open()

...全文

58 14 打赏收藏转发到动态举报

写回复

用AI写文章

14 条回复

切换为时间正序

请发表友善的回复…

发表回复

zlbing 2003-10-17

打赏
举报

同意各个楼上

acewang 2003-10-17

打赏
举报

Access
ODBC

Standard Security:
"Driver={Microsoft Access Driver (*.mdb)};Dbq=\somepath\mydb.mdb;Uid=Admin;Pwd=asdasd;"

Workgroup:
"Driver={Microsoft Access Driver (*.mdb)};Dbq=\somepath\mydb.mdb;SystemDB=\somepath\mydb.mdw;","admin", ""

OLEDB, OleDbConnection (.NET)

Standard security:
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;User Id=admin;Password=asdasd;"

Workgroup (system database):
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;Jet OLEDB:System Database=system.mdw;","admin", ""

With password:
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;Jet OLEDB:Database Password=MyDbPassword;","admin", ""

acewang 2003-10-17

打赏
举报

public void CreateOleDbConnection()
{
string myConnString = "Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=Northwind;Integrated Security=SSPI;";
OleDbConnection myConnection = new OleDbConnection(myConnString);
myConnection.Open();
MessageBox.Show("ServerVersion: " + myConnection.ServerVersion
+ "\nDataSource: " + myConnection.DataSource.ToString());
myConnection.Close();
}

qiuji 2003-10-17

打赏
举报

首先，连接access数据库，应该是：
Imports System.Data
Imports System.Data.OleDb

连接字符串的写法：
'使用相对路径
cn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("database\mydatabase.mdb")

'使用绝对路径
cn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\database\\mydatabase.mdb")

srj911 2003-10-17

打赏
举报

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<%@ Page Language="vb" Debug="true" %>
<%@import namespace="system.data"%>
<%@import namespace="system.data.sqlclient"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>职务维护</title>
</head>
<script language="VB" runat="server">
dim conn as sqlconnection
dim cmd as sqlcommand
dim reader as sqldatareader
dim ada as sqldataadapter
dim ds as dataset
sub bingding()
conn=new sqlconnection("data source=lzh\lzh;initial catalog=renshi;user id=sa;password=sql;")
conn.open()
ada=new sqldataadapter("select * from zw",conn)
ds=new dataset
ada.fill(ds,"zw")
datagrid1.datasource=ds.tables("zw").defaultview
datagrid1.databind()

end sub
sub page_load(sender as object,e as eventargs)
if not ispostback then
bingding()
end if
end sub
sub datagrid_update(sender as object,e as datagridcommandeventargs)
dim zwmctxt as textbox=e.item.cells(2).controls(0)
dim zwid as string=e.item.cells(1).text
dim sqlstr,zwmc as string
zwmc=zwmctxt.text
sqlstr="update zw set zwmc='"+zwmc+"' where zwid='"+zwid+"'"
conn=new sqlconnection("data source=lzh\lzh;initial catalog=renshi;user id=sa;password=sql;")
conn.open()
cmd=new sqlcommand(sqlstr,conn)
cmd.executenonquery()
datagrid1.edititemindex=-1
bingding()
end sub
sub datagrid_cancel(sender as object,e as datagridcommandeventargs)
datagrid1.edititemindex=-1
bingding()
end sub

sub datagrid_edit(sender as object,e as datagridcommandeventargs)
datagrid1.edititemindex=e.item.itemindex
bingding()
end sub
</script>
<body>
<div align="center"><font color="#CC9966" size="+1"><b>职务维护</b></font></div>
<form runat="server">
<table cellpadding="2" cellspacing="0" border="1" width="85%">
<tr><td></td>
<td><asp:datagrid ID="datagrid1" runat="server" HeaderStyle-BackColor="#aaaadd" ItemStyle-BackColor="#c0c0c0"
HeaderStyle-Font-Name="verdana" Font-Size="10px" Font-Name="verdana" border="1" BorderColor="red"
CellPadding="2" CellSpacing="0" AutoGenerateColumns="false" Width="100%" DataKeyField="zwid"
OnEditCommand="datagrid_edit"
OnUpdateCommand="datagrid_update"
OnCancelCommand="datagrid_cancel"
>
<columns>
<asp:editcommandcolumn
EditText="编辑" UpdateText="更新" CancelText="取消" HeaderText="职务维护" ItemStyle-Wrap="false"
HeaderStyle-Wrap="false"/>
<asp:boundcolumn DataField="zwid" HeaderText="职务号" ReadOnly="true"/>
<asp:boundcolumn DataField="zwmc" HeaderText="职务名称"/>
</columns>
</asp:datagrid>

</td>
</tr>
</table>
</form>
</body>
</html>

rgbcn 2003-10-17

打赏
举报

这个是连sql server 的

连mdb 用
Imports System.Data.OleDb
按我上面说的准没错

feeling 2003-10-17

打赏
举报

引入
Imports System.Data.SqlClient
Imports System.Data

这个不能用作 mdb 数据库吗？

zsww 2003-10-17

打赏
举报

给你个参考：

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports System.Web
Imports System.Web.SessionState
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls

Public Class WebForm1
Inherits System.Web.UI.Page

Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
'在此处放置初始化页的用户代码
If Not Page.IsPostBack Then
'网页组件初始设置
lblMsg.Text = "开始登陆"
TextBox1.Text = ""
TextBox2.Text = ""
End If
End Sub

Sub ButtonOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonOk.Click

Dim strConn, strSQL As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Intranet.mdb")
strSQL = "select e.emp01,d.dep02,e.emp03,e.emp04,e.emp05 from emp e,dept d"
strSQL = strSQL & " where e.emp01='" & TextBox1.Text & "' and e.emp09='" & TextBox2.Text & "'"
strSQL = strSQL & " and e.emp02=d.dep01"

'建立数据库连接
Dim myConn As New OleDbConnection(strConn)
myConn.Open()

'建立OleDbCommand对象,以便执行SQL指令或获取OleDbDataReader对象
Dim myCommand As New OleDbCommand(strSQL, myConn)

'取得OleDbDataReader对象
Dim dr As OleDbDataReader
dr = myCommand.ExecuteReader()

If dr.Read() Then
Session("UserID") = dr.Item(0)
If dr.IsDBNull(1) Then
Session("UserDep") = ""
Else
Session("UserDep") = dr.Item(1)
End If

If dr.IsDBNull(2) Then
Session("UserCName") = ""
Else
Session("UserCName") = dr.Item(2)
End If

If dr.IsDBNull(3) Then
Session("UserEName") = ""
Else
Session("UserEName") = dr.Item(3)
End If

If dr.IsDBNull(4) Then
Session("UserEmail") = ""
Else
Session("UserEmail") = dr.Item(4)
End If

Page.Response.Redirect("WebForm2.aspx") 'WebForm2.aspx为主功能页面

Else
Session("UserID") = ""
Session("UserDep") = ""
Session("UserCName") = ""
Session("UserEName") = ""
Session("UserEmail") = ""

lblMsg.Text = "用户ID或用户密码输入错误!!请重新输入!!"
TextBox1.Text = ""
TextBox2.Text = ""
End If

myConn.Close()

End Sub

Sub ButtonCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonCancel.Click
TextBox1.Text = ""
TextBox2.Text = ""
End Sub

End Class

-----------努力学习不断实践虚心讨教---------

xiaomaolover 2003-10-17

打赏
举报

j sql server 还是access？

rgbcn 2003-10-17

打赏
举报

还有一个地方错了，
SqlClient.SqlConnection 要改成 OleDb.OleDbConnection

guoyan19811021 2003-10-17

打赏
举报

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Tax.mdb

rgbcn 2003-10-17

打赏
举报

上面是c# 的

Imports System.Data
Imports System.Data.OleDb
Public cn As New SqlClient.SqlConnection
cn.ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Data ource=BugTypes.MDB";
cn.Open()

rgbcn 2003-10-17

打赏
举报

using System;
using System.Data;
using System.Data.OleDb;//accees 用这个
string strAccessConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data ource=BugTypes.MDB";