账号通
    

账号  

密码  

3931

查看

10

回复
主题:kesion4.5 ac转SQL与dvBBS8.1SQL整合 [收藏主题] 转到:  
hg126 当前离线

157

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1877 分
登录次数:95 次
注册时间:2007/12/6
最后登录:2011/6/25
hg126 发表于:2008/1/5 14:08:00   | 显示全部帖子 查看该作者主题 楼主 
科汛在线网校系统

kesion4.5 ac转SQL与dvBBS8.1SQL整合,这个论坛里有那们做过?
我们只要非商业的程序啊!一切都是免费!
思路解析一下:
1.分别从官方免费下载最新的程序 Kesion4.5  /  Dvbbs8.1.1
2.在正常情况下按官方说明整合这两个程序的AC版!
3.每个程序单独转成SQL,SQL有这个功能,只要将AC的数据库转过来就行了!
4.认真检查每一个转过来的程序!会有错误的!


&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
---------------------------------------------------------------------------------------------------------------------------------------
***************************************************************************************************************************************
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&



:P
本人能力有限,正在测试中,估计1月12号能完成,在此请有过这方面经验的朋友帮帮忙,发表一下意见!
如果有这样的完整程序,不防共享一下!

[em80]

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
hg126 当前离线

157

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1877 分
登录次数:95 次
注册时间:2007/12/6
最后登录:2011/6/25
hg126 发表于:2008/1/5 19:55:00   | 显示全部帖子 查看该作者主题 沙发 
科汛在线网校系统

这是网上收的代码,还有一个是转好了的DV8.0的,呆会传个地址上来!

以下是代码片段:

[em80]

我们的原则就是:免费到家,免费到个人!
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Dv_TSQL]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[Dv_TSQL]
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Dv_loadSetup]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[Dv_loadSetup]
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[dv_Dispbbs]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[dv_Dispbbs]
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[dv_list]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[dv_list]
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[dv_toplist]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[dv_toplist]
GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [Dv_TSQL]
@tsql varchar(500)
AS
exec(@tsql)

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [Dv_loadSetup]

AS
Select * from [Dv_setup]


GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [dv_Dispbbs]
@boardid int=1,
@pagenow int=1, --当前页数
@pagesize int=1, --定义每页面帖子数目
@Announceid int=1,
@TotalUseTable nvarchar(10) ='Dv_bbs1'

AS
set nocount on
Select AnnounceID from [Dv_bbs1] Where BoardID=@BoardID And RootID=@Announceid Order By AnnounceID


GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [dv_list]
@boardid int=1,
@pagenow int=1, --当前页数
@pagesize int=1, --定义每页面帖子数目
@tl int=0, --按时间段查询
@topicmode int=0, --专题
@totalrec int output

AS
set nocount on
declare @int_topnum int
declare @int_timenum int
declare @var_times varchar(5000)

if @pagenow>1
if @topicmode>0
begin
select @int_timenum=(@pagenow-1)*@pagesize
set rowcount @int_timenum
select @var_times=lastposttime from Dv_Topic where mode=@topicmode and boardID=@boardID and istop = 0 ORDER BY lastposttime desc

set rowcount @pagesize
select TopicID,boardid,title,postusername,postuserid,dateandtime,child,hits,votetotal,lastpost,lastposttime,istop,isvote,isbest,locktopic,Expression,TopicMode,Mode,GetMoney,GetMoneyType,UseTools,IsSmsTopic,HideName from dv_topic where mode=@topicmode and boardID=@boardID and istop = 0 and lastposttime < @var_times ORDER BY lastposttime desc

set nocount off
return
end
else
begin
select @int_timenum=(@pagenow-1)*@pagesize
set rowcount @int_timenum
select @var_times=lastposttime from Dv_Topic where boardID=@boardID and istop = 0 ORDER BY lastposttime desc

set rowcount @pagesize
select TopicID,boardid,title,postusername,postuserid,dateandtime,child,hits,votetotal,lastpost,lastposttime,istop,isvote,isbest,locktopic,Expression,TopicMode,Mode,GetMoney,GetMoneyType,UseTools,IsSmsTopic,HideName from dv_topic where boardID=@boardID and istop = 0 and lastposttime < @var_times ORDER BY lastposttime desc

set nocount off
return
end

else
if @topicmode>0
begin
set rowcount @pagesize
select TopicID,boardid,title,postusername,postuserid,dateandtime,child,hits,votetotal,lastpost,lastposttime,istop,isvote,isbest,locktopic,Expression,TopicMode,Mode,GetMoney,GetMoneyType,UseTools,IsSmsTopic,HideName from Dv_topic where mode=@topicmode and boardID=@boardid and istop = 0 ORDER BY lastposttime desc
end
else
begin
set rowcount @pagesize
select TopicID,boardid,title,postusername,postuserid,dateandtime,child,hits,votetotal,lastpost,lastposttime,istop,isvote,isbest,locktopic,Expression,TopicMode,Mode,GetMoney,GetMoneyType,UseTools,IsSmsTopic,HideName from Dv_topic where boardID=@boardid and istop = 0 ORDER BY lastposttime desc
end

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [dv_toplist]
@pagenow int ,
@pagesize int ,
@reture_value int output,
@intUserRecordCount int output
as
/*定义局部变量*/
declare @intBeginID int
declare @intEndID int
declare @intPageCount int
declare @intRowCount int

/*关闭计数*/
set nocount on

/*求总用户数*/
select @intUserRecordCount = count(*) from [dv_user]
if (@intUserRecordCount = 0) --如果没有用户,则返回零
set @reture_value =0

/*判断页数是否正确*/
if (@pagenow - 1) * @pagesize > @intUserRecordCount
set @reture_value =1
--return (-1)

/*求开始userID*/
set @intRowCount = (@pagenow - 1) * @pagesize + 1
/*限制条数*/
set rowcount @intRowCount
select @intBeginID = userid from [dv_user] order by userid desc

/*结束userID*/
set @intRowCount = @pagenow * @pagesize
/*限制条数*/
set rowcount @intRowCount
select @intEndID = userid from [dv_user] order by userid desc

/*恢复系统变量*/
set rowcount 0
set nocount off

select username,useremail,userclass,UserIM,UserPost,JoinDate,userwealth,userid from [dv_user] where userid between @intEndID and @intBeginID order by userid desc
return(@@rowcount)
--select @@rowcount

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
hg126 当前离线

157

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1877 分
登录次数:95 次
注册时间:2007/12/6
最后登录:2011/6/25
hg126 发表于:2008/1/5 17:44:00   | 显示全部帖子 查看该作者主题 藤椅 
以下是引用wead在2008-1-5 15:26:00的发言:

好象科汛一直没有存储过程,只要是ACC/SQL通用这种程序一般都很难有存储过程吧,调用数据方式不一样,用免费ACC升级SQL最大区别在功能上,免费版有些功能是屏蔽了的不仅仅是个数据库的问题

话不能这样说啊,你们看 一下,现在网上的Dvbbs8.1SQL的下载,在网上多的是,不在官方下载的是最近出来的,只要你懂点程序,对他们的程序多了解一点,修改起来是没问题的!
哎呀,我的那个做好了,就共享出来,大家不抢才怪哩!但是这个程序一定会是完整的,只做交流用,商业的话我就不能保证安全性,大家测试一下就知道了…………

呵呵,要这样下去,我也能开个公司了!呵呵


[em81]
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
hg126 当前离线

157

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1877 分
登录次数:95 次
注册时间:2007/12/6
最后登录:2011/6/25
hg126 发表于:2008/1/5 14:09:00   | 显示全部帖子 查看该作者主题 板凳 
做在线知识付费 选科汛云开店

各们路过的朋友,看贴一定在回啊!!

多多少少,你说点!

我爱你
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.40625秒 powered by KesionCMS 9.0