如何防止被导

KenjiSato

大侠们：
ADP连接SQL如果保存连接密码，表会被导出。微软的例子看不太明白，哪位高手能否做个例子，能否将密码保存在代码中，打开ADP再自动连接SQL。

谢谢！

HG

在ADP中可以用adodb.command來調用

KenjiSato

这好象是SQL命令，在ADP中如何使用？
谢谢！

HG

哪就用grant語句了,
Syntax
Statement permissions:

GRANT {ALL | statement[,…n]}
TO security_account[,…n]

Object permissions:

GRANT
    {ALL [PRIVILEGES] | permission[,…n]}
    {
        [(column[,…n])] ON {table | view}
        | ON {table | view}[(column[,…n])]
        | ON {stored_procedure | extended_procedure}
    }
TO security_account[,…n]
[WITH GRANT OPTION]
[AS {group | role}]
例如
USE pubs

GO

  

GRANT SELECT

ON authors

TO public

GO

  

GRANT INSERT, UPDATE, DELETE

ON authors

TO Mary, John, Tom

GO

  

KenjiSato

HG：我想要的是在幕后自动执行。

HG

取消select權可以在SQL上設置,可以用企業管理器來中用戶權限可設置.
可以用代碼來控制,太麻煩,不如用SQL grant 语句来的快,可以用用上述圖形界面來設置.

KenjiSato

yuab:谢谢你再次的例子，这样不能打开，因为本身ADP已 Persist Security Info=false登录就会提示输入连接SQL密码，我的意思是启动ADP：
    Application.CodeProject.OpenConnection _
                "ROVIDER=SQLOLEDB.1ASSWORD=123 ;USER ID=SA ersist Security Info=TRUE;INITIAL CATALOG=MRP;DATA SOURCE=SERVER"

之后再用 Persist Security Info=FALSE

KenjiSato

HG：请能否给个例子？，取消SELECT在SQL服务器上设吗还是可以用代码控制？

HG

如果您只是防止表被導出,哪麼您只須取消它的SELECT權限即可,
取消了SELECT權限,並不代表不可以寫數據的.(或者您的表數據源為存儲過程,把寫和讀分開操作,在須查詢時,只查詢單記錄,在寫時不顯示數據,)
各位往往把事件復雜化了.

yuab

请看这个例子吧！能不能满足你的要求文件下载