📄 5771.html
字号:
<html>
<head>
<title>RDO access remote MS access97 database error?Who save me?</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>RDO access remote MS access97 database error?Who save me?</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:yuan12@yahoo.com">Mrs wang</a> on September 18, 1998 at 11:47:16:<p>
NT server4.0 machine name:wang<br>system dsn:mydata<br>in my local machine :c:\mydatabase.mdb<br>how to access remote NT server4.0 machine wang<br>in database shareing directory<br>c:\winnt\mydatabase.mdb,please help me?<br>Option Explicit<br>program code as follows:<br>Public en As rdoEnvironment<br>Public cn As rdoConnection<br>Private Sub Form_Load()<br>Dim scnct As String<br>Dim rs As rdoresultset<br>Dim ssql As String<br>Set en = rdoEngine.rdoEnvironments(0)<br>scnct = "c:\winnt\db1.mdb;Driver=C:\WINNT\System32\odbcjt32.dll;" _<br>& "DriverID=25;FIL=MS Access;UID=;PWD=;server=wang;dsn=mydata;"<br>Set cn = en.OpenConnection(dsname:="", _ 'this line debug errors<br>prompt:=rdDriverNoPrompt, ReadOnly:=False, Connect:=scnct)<br>ssql = "select * from branch"<br>Set rs = cn.OpenResultset(ssql, rdopenkeyset)<br>rs.addnew<br>rs("branch_id") = "2"<br>rs("branch__tep") = "132421"<br>rs.Update<br>While Not cn.EOF<br>rs.MoveNext<br>Wend<br>rs.Close<br>cn.Close<br>End Sub<br>but debug errors:<br>there is errors:IM002[microsoft][odbc driver manager] data source name not found and no default<br>driver specified <br>who can save me?
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 5771-->
<!--top: 5834--><li><a href="5834.html">苤挔ㄛ斓赻备岆RDO询忒ㄛ崋系祥隙湘扂儸ˋ珨跺场悝VB腔苤账ㄐㄐㄐ</a> <b>Mrs Wang</b> <i>08:45:12 9/21/98</i>
(<!--responses: 5834-->0)
<ul><!--insert: 5834-->
</ul><!--end: 5834-->
</ul><!--end: 5771-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -