| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 982 人关注过本帖
标题:[求助]一个关于vb.net与SQL Server连接的问题
取消只看楼主 加入收藏
番茄宝宝
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-10-10
收藏
 问题点数:0 回复次数:1 
[求助]一个关于vb.net与SQL Server连接的问题

我用VB.NET编了一个管理系统的程序,可是不知为什么运行时出现“用户‘Sa’登录失败”的问题,显示原因为:未与信任SQL Server连接相关联
有没有哪位能帮帮我这个菜鸟尽快解决这个问题,不胜感激!!

搜索更多相关主题的帖子: SQL Server 
2006-10-10 15:39
番茄宝宝
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-10-10
收藏
得分:0 

下面是我连接数据库的代码:SQL里需要做些什么吗?
Option Explicit On
Imports System.Data
Imports System.Data.SqlClient
Public Class Class1

Public Shared Connstr As String = "server=localhost;database=OrderSys;uid=Sa;pwd=Sa"

Public Function CreateDataTable(ByVal SQLcmd As String) As DataTable
Dim conn As SqlConnection
Dim myAdapter As SqlDataAdapter
Dim myDataSet As New DataSet
Try
conn = New SqlConnection(Connstr)
conn.Open()
myAdapter = New SqlDataAdapter(SQLcmd, conn)
myAdapter.Fill(myDataSet)
conn.Close()
Return myDataSet.Tables(0)
Catch ex As Exception
End Try
End Function
Public Function updatadatabase(ByVal sqlcmd As String)
Try
Dim conn As SqlConnection, cmd As SqlCommand
conn = New SqlConnection(Connstr)
conn.Open()
cmd = New SqlCommand(sqlcmd, conn)
cmd.ExecuteNonQuery()
conn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Function
End Class

2006-10-10 21:06
快速回复:[求助]一个关于vb.net与SQL Server连接的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016187 second(s), 8 queries.
Copyright©2004-2025, BC-CN.NET, All Rights Reserved