设为首页 加入收藏

TOP

机房收费系统之组合查询――窗体的继承(四)
2015-11-21 01:58:26 来源: 作者: 【 】 浏览:3
Tags:机房 收费系统 组合 查询 窗体 继承
eck.cmbField2), New SqlParameter("@cmbFiled3", groupcheck.cmbField3), New SqlParameter("@cmbOperator1", groupcheck.cmbOperator1), New SqlParameter("@cmbOperator2", groupcheck.cmbOperator2), New SqlParameter("@cmbOperator3", groupcheck.cmbOperator3), New SqlParameter("@txtContent1", groupcheck.txtContent1), New SqlParameter("@txtContent2", groupcheck.txtContent2), New SqlParameter("@txtContent3", groupcheck.txtContent3), New SqlParameter("@cmbRelation1", groupcheck.cmbRelation1), New SqlParameter("@cmbRelation2", groupcheck.cmbRelation2), New SqlParameter("@tableName", groupcheck.GetTable)} '设置参数 Dim strSql As String = "PROC_GroupQuery" '调用存储过程 table = helper.GetDataTable(strSQL, CommandType.StoredProcedure, prams) Return table End Function End Class

存储过程:

?

?

-- =============================================
-- Author:		邢玉
-- Create date: 2015/7/27
-- Description:	组合查询
-- =============================================
ALTER PROCEDURE [dbo].[PROC_GroupQuery] 
	-- Add the parameters for the stored procedure here
	
	@cmbFiled1 varchar(10),
	@cmbOperator1 varchar(10),
	@txtContent1 varchar(10),
	@cmbFiled2 varchar(10),
	@cmbOperator2 varchar(10),
	@txtContent2 varchar(10),
	@cmbFiled3 varchar(10),
	@cmbOperator3 varchar(10),
	@txtContent3 varchar(10),
	@cmbRelation1 varchar(10),
	@cmbRelation2 varchar(10),
	@tableName varchar(20)
AS
     declare @TempSql varchar(500)--临时存放Sql语句
--BEGIN
--	SET @TempSql='SELECT * FROM '+@tableName +'WHERE'+@cmbFiled1 +@cmbOperator1 +char(39)+@txtContent1 +char(39)
--	if @cmbRelation1 != ''
--	BEGIN
--	SET @TempSql=@TempSql +@cmbRelation1 +CHAR(32)+@cmbFiled2 +@cmbOperator2 +CHAR (39)+@txtContent2 +CHAR (39)
--	if @cmbRelation2 != ''
--	BEGIN
--	SET @TempSql=@TempSql +@cmbRelation2 +CHAR (32)+@cmbFiled3  +@cmbOperator3 +CHAR (39)+@txtContent3 +char(39)
--	end
--	end 
--	EXECUTE(@TempSql)
BEGIN  
    SET @TempSql='SELECT * FROM '+@tableName +' WHERE ' +@cmbFiled1 +@cmbOperator1+char(39) + @txtContent1 + char(39)    
    if (@cmbRelation1 != '') 
    BEGIN    
        SET @TempSql=@TempSql+@cmbRelation1+CHAR(32)+@cmbFiled2 +@cmbOperator2+CHAR(39)+@txtContent2+CHAR(39)    
        if (@cmbRelation2 is not null ) 
        BEGIN    
        SET @TempSql=@TempSql+@cmbRelation2+CHAR(32)+@cmbFiled3+@cmbOperator3+CHAR(39)+@txtContent3+CHAR(39)    
        END    
    END    
EXECUTE(@TempSql)
END

抽象工厂

?

?

'/*****************************************
'类 名 称:LoginFactory
'命名空间:Factory
'创建时间:2015/6/7 16:18:59
'作    者:邢玉
'小    组:
'修改时间:
'修 改 人:
'版 本 号:v1.0.0
’******************************************
Imports System.Configuration   '添加对配置文件的引用
Imports System.Reflection   '添加对反射的应用
Imports IDAL
Imports System.Data
 '''  ''' 实例化一个JFDAL中的GroupCheck表的类 ''' 
    ''' 
   
    ''' 
   
    Public Shared Function GroupCheck() As IGroupCheckDAL
        Dim className As String = AssemblyName + "." + db + "GroupCheckDAL"
        Dim Igroupcheck As IDAL.IGroupCheckDAL
        Igroupcheck = CType(Assembly.Load(AssemblyName).CreateInstance(className), IGroupCheckDAL)
        Return Igroupcheck
    End Function
编辑完父窗体之后就是要添加我们继承的子窗体了。

?

第一步:添加继承窗体:

\

第二步:选择被继承的窗体:

\

最后在子类中重写父类的虚方法:

?

/************************************************* 
'作者:邢玉
'小组:  
'说明:组合查询模板
'创建日期:2015.8.9
'版本号:
'*
首页 上一页 1 2 3 4 下一页 尾页 4/4/4
】【打印繁体】【投稿】【收藏】 【推荐】【举报】【评论】 【关闭】 【返回顶部
分享到: 
上一篇SQL必知必会笔记第十九章使用存储.. 下一篇csharp: MongoDB

评论

帐  号: 密码: (新用户注册)
验 证 码:
表  情:
内  容: