VB.NET执行存储过程

'----------------------------------------------------------------  
          '  
          '  
          '   功能：计算单签字  
          '   参数：计算单标识码，审核状态  
          '   返回：成功与否  
          '  
          '----------------------------------------------------------------  
          <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'