主题：[求助]登录数据库提示

改成你自己的连接字符串

 

Dim s As String="Provider=SQLOLEDB.1;Password=hailun.;Persist Security Info=True;User ID=sa;Initial Catalog=master;Data Source=voyo"

 

改成你自己的数据库名

 

Dim dname As String = "test"

红袍老师，

删除连接是最简单的方法。删除连接以后，就不会出问题了啊。

 

-----------------要不，你就停止sqlserver服务，再启动，再分离，再附加

此主题相关图片如下：qq图片20151203224414.png

红袍老师，

 

现在手动也加不上去数据库了

 

 

是不是也这个删除链接有关呢

数据库文件对应的文件夹 里的 文件 mdf _log 文件也不能删除 好像还在使用着 可是 没有用的程序 也没连接着 

我在测试删除链接的代码

首先提示

 

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2015.11.11.1
错误所在事件：
详细错误信息：
无效的 SQL语句；期待 'DELETE'、'INSERT'、'PROCEDURE'、'SELECT'、或 'UPDATE'。

 

然后再一次提示

 

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2015.11.11.1
错误所在事件：
详细错误信息：
无效的 SQL语句；期待 'DELETE'、'INSERT'、'PROCEDURE'、'SELECT'、或 'UPDATE'。

然后提示

 

 

此主题相关图片如下：qq图片20151115195144.png

 

继续提示

 

此主题相关图片如下：qq图片20151203225030.png

此主题相关图片如下：qq图片20151203225121.png

 

 

此主题相关图片如下：qq图片20151203225125.png

代码如下

 

Dim s As String="Provider=SQLOLEDB.1;Password=000211;Persist Security Info=True;User ID=sa;Initial Catalog=master;Data Source=" & sysinfo.computername
If Connections.Contains("test") Then
    Connections.Delete("test")
    Connections.Add("test", s)
Else
    Connections.Add("test", s)
End If
'停止运行数据库

Dim cmd As new SQLCommand
cmd.CommandText = Tables("表a").rows(1)("第一列")
cmd.ExecuteNonQuery
MessageBox.Show("处理1结果" & cmd.ExecuteNonQuery)
cmd.CommandText = Tables("表a").rows(0)("第一列")
cmd.ExecuteNonQuery
MessageBox.Show("处理2结果" & cmd.ExecuteNonQuery)
cmd.CommandText ="use master; exec StopLogin 'maxtrue_admin'"
cmd.ExecuteNonQuery()
MessageBox.Show("处理3结果" & cmd.ExecuteNonQuery)

'卸载数据库

汗，cmd你要指定数据源啊

 

cmd.ConnectionName = "test"

老师，

   加上了，报错一样的，

处理1结果0后边的那些

我还测试了一下

If Connections.TryConnect(s)=True Then
MessageBox.Show(S)                                      这块能弹窗
Dim cmd As new SQLCommand
cmd.CommandText="test"
cmd.CommandText = Tables("表a").rows(1)("第一列")
cmd.ExecuteNonQuery
MessageBox.Show("处理1结果" & cmd.ExecuteNonQuery)
cmd.CommandText = Tables("表a").rows(0)("第一列")
cmd.ExecuteNonQuery
MessageBox.Show("处理2结果" & cmd.ExecuteNonQuery)
cmd.CommandText ="use master; exec StopLogin 'maxtrue_admin'"
cmd.ExecuteNonQuery()
MessageBox.Show("处理3结果" & cmd.ExecuteNonQuery)
End If

那报什么错啊？