'---------------------------------------------------------------- ' ' ' 功能:计算单签字 ' 参数:计算单标识码,审核状态 ' 返回:成功与否 ' '---------------------------------------------------------------- <AutoComplete()> _ Public Function Signature(ByVal CalSheetID As System.Guid,ByVal Power As System.Int16) As Boolean Dim sSql As String Dim sysInfo As New CSBusinessRules.SystemInfo() Dim Params() As SqlParameter = _ {New SqlParameter("@标识码",SqlDbType.UniqueIdentifier),_ New SqlParameter("@审核状态",SqlDbType.SmallInt)} Params(0).Value = CalSheetID Params(1).Value = Power sSql = "UPDATE Measure_CalculationSheet " sSql = sSql & "SET 审核状态 =@审核状态 " sSql = sSql & "WHERE (标识码 = @标识码) " ' 运行语句 Try Return m_objDataLayer.ExecuteSQL(sSql,Params) Catch ex As Exception Throw New Exception(ex.Message,ex) Return False End Try End Function
--------------------------------------------------------------------------
1、在远程机建立共享文件夹,并分配相应的写权限
2、在要进行备份的数据库实例中运行以下命令,以建立信任关系: master..xp_cmdshell 'net use//remoteserver_name/sharefolder password /user:domain/user'
2005要配置允许执行xp_cmdshell
3、backup database database_name to disk='//remoteserver_name/sharefolder/master.bak' (编辑:李大同)
【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!
|