sql server的安全问题

现在也说不好
某人说在机器上面可以访问sql server的数据库（非电脑部人员）--也可能是谣言。
我们部门也在查这件事。我看了他们的电脑，到没看到什么工具--也许是有，我没看出来

pbsql(风云)
随便写个sql server的应用程序即可那这个应用程序,运行也要有一定的环境支持吧

只要知道数据库的sql server身份验证用户名、密码应用程序就可以连接并操作数据库

访问SQL数据库,还是使用SQL数据库文件?如果是访问SQL数据库,只要你的电脑能和SQL数据库所在的服务器连接,并且有一定权限.
则用查询分析器,自己写程序(比较用ADO,ODBC等数据库连接技术),用SQL自己的客户端工具isql.exe/osql.exe等都可以实在是太多方法

如果是不安装SQL而要使用数据文件那就没那么简单了,你要熟悉数据文件的存储格式,并按照这个格式去写相应的程序实现.
至少我写不出来,也不知道数据文件的存储格式

zjcxc(邹建）是访问sql数据库的内容，因为听说能看到表中的数据局域网内部的机器，是可以看到数据库所在的服务器,但是一般情况,数据库的文件不是共享的.而且我们也可以肯定他一定没有权限.我看过他们的电脑没有编程的工具,也没有sql相关的客户端工具啊.

SQL数据库的访问根本不需要共享数据文件访问SQL数据库:
只需要知道服务器名(或IP地址),一个可以访问SQL数据库的用户就行了.
对于用户的问题,默认情况下,任意一个加入administrators组的windows用户登陆操作系统都可以访问你的SQL数据库 (对等网,如果你的SQL在专门服务器,并且需要用特定的用户登陆才能访问服务器的话,那就需要用合法的用户登陆到你的服务器)
更不要说,有的人根本就不对sa设置密码
没有相关的客户端工具? 有没有Word/Excel/Access/或其他程序设计语言,有上述任意一种都可以访问啦. 能访问SQL的客户端工具大把,不可能一一列举,而且我也不知道所有的客户端工具(相信没有几个人能列得全吧)

楼上的高手
能否用excel 给我举个简单的例子
比如数据库服务器 serSql
          数据库 dbTest
          用户名 sa
          密码   aaa我真的是不明白
帮帮忙

'Excel的VBA你用过吗? 如果没用过,那就只好你自己慢慢研究了.'在EXCEL里是显示SQL中的数据？'使用方法:
'Excel新建一个文件--工具--宏--Visual Basic 编辑器
'    --插入--模块--然后输入下面的代码
'再根据你的情况做修改就可以了
'修改完成后,点运行,即在新建的Excel文件中看到数据.Sub qry()
    Dim iRe As Object
    Dim iConc$

    Dim xlQuery As Excel.QueryTable
    Dim xlSheet As Excel.Worksheet    '数据库连接字符串,需要根据你的情况做对应调整
    iConc = "Provider=SQLOLEDB.1;Persist Security Info=True;" & _
        "User ID=sa;Password=aaa;Initial Catalog=dbTest;Data Source=serSql"

    Set iRe = CreateObject("ADODB.recordset")
    With iRe
        .CursorLocation = 3
        .Open "要读取的表名", iConc, 1, 1
    End With

    Set xlSheet = ActiveWorkbook.Sheets(1)  '在工作表中显示结果
    Set xlQuery = xlSheet.QueryTables.Add(iRe, xlSheet.Range("a1"))

    With xlQuery
        .FieldNames = True  '显示字段名
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = True
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .Refresh
    End With

    With xlSheet
        .Range(.Cells(1, 1), .Cells(1, iRe.Fields.Count)).Font.Name = "黑体"   '设标题为黑体字
        .Range(.Cells(1, 1), .Cells(1, iRe.Fields.Count)).Font.Bold = True    '标题字体加粗

        '设表格边框样式
        '.Range(.Cells(1, 1), .Cells(iRe.RecordCount + 1, Icolcount)).Borders.LineStyle = xlContinuous
    End With

    iRe.Close
    Set iRe = Nothing
    Set iCmd = Nothing
    Set xlSheet = Nothing
    Set xlQuery = Nothing
End Sub

楼上的，多谢了
vba用过一次
我市一下
看来这些分非你莫属了

调试易

sql server的安全问题

解决方案 »