主题:  把以前写的日历改成了webservice,欢迎大家使用

5D荣誉斑竹

职务:普通成员
等级:3
金币:10.0
发贴:751
注册:2001/5/21 21:43:30
#12003/7/4 1:32:11
前一段时间写了个日历的udf,但是发现他过于单调只能显示日期,用户不可以自定义颜色和样式,今天有空把他改成了components,用户可以定义颜色,把它变成自己喜欢的样式。希望大家喜欢.

可以远程调用,详细情况请看帮助: http://www.cfsky.com/webservice/autocalendar_help.cfm



s22

职务:版主
等级:4
金币:10.0
发贴:1634
注册:2004/12/19 13:06:46
#22003/7/4 9:07:09
说到WEBservices就顺便谈谈吧

在COLDFUSION中你会写CFC就可以做WEBSERVICES,方法就是
在你的CFC地址后加?wsdl

最近测试版经常出问题,你可以检查一下看看有没有设置返回值的类型
另外一个就是给函数改名



金山羊

职务:普通成员
等级:4
金币:10.0
发贴:827
注册:2002/1/6 14:44:13
#32003/7/5 17:42:24
现在测试版的经常出问题,不知道什么原因


5d.cn
FLASHDEP
TECHNOLOGY SUPPORT
JAVA/ACTIONSCRIPT/javascript
CFML/JSP/COLDFUSION/FLASH REMOTING
JRUN/COLDFUSIONMX
FLASH/DREAMWEARER

VRFans

职务:版主
等级:4
金币:10.0
发贴:1353
注册:2001/6/5 21:34:18
#42003/7/8 17:28:05
美化一下:
------------------------------------

function create_yearlist(yearnum){
writeoutput('');
}

function create_monthlist(monthnum){
writeoutput('');
}

function create_calendar(){
if(isdefined("form.yearlist")){
yearnow=form.yearlist;
monthnow=form.monthlist;
}else{
yearnow=year(now());
monthnow=month(now());
}
if(isdefined("form.next")){
if(form.monthlist neq 12){
yearnow=form.yearlist;
monthnow=form.monthlist+1;
}else{
yearnow=form.yearlist+1;
monthnow=1;
}
}
if(isdefined("form.prev")){
if(form.monthlist neq 1){
yearnow=form.yearlist;
monthnow=form.monthlist-1;
}else{
yearnow=form.yearlist-1;
monthnow=12;
}
}
/*
if(arraylen(arguments) eq 0){
yearnow=year(now());
monthnow=month(now());
}
if(arraylen(arguments) eq 2){
yearnow=arguments[1];
monthnow=arguments[2];
}
if((arraylen(arguments) eq 1) and (listlen(arguments[1]) eq 4)){
yearnow=arguments[1];
monthnow=month(now());
}else{
yearnow=year(now());
monthnow=arguments[1];
}
*/
/*一个月第一天的日期*/
first_day=createdate(yearnow,monthnow,1);
/*当月的天数*/
all_days=daysinmonth(first_day);
/*第一天在星期中的编号(星期天是1)*/
day_inweek=dayofweek(first_day);
/*最后一天的日期*/
last_day=createdate(yearnow,monthnow,all_days);
/*最后一天在星期中的编号(星期天是1)*/
lastday_inweek=dayofweek(last_day);
writeoutput('');
for(j=1;j lt day_inweek; j=j+1){
writeoutput("");
}

for(i=1;i lt all_days+1;i=i+1){
if(((i+j-1) mod 7) neq 0){
if(day(now()) eq i and year(now()) eq yearnow and month(now()) eq monthnow){
writeoutput("");
}else{
writeoutput("");
}
}else{
if(day(now()) eq i and year(now()) eq yearnow and month(now()) eq monthnow){
writeoutput("");
}else{
writeoutput("");
}
}
}
for(k=lastday_inweek+1;k lt 8;k=k+1){
writeoutput("");
}
writeoutput("
');
create_yearlist(yearnow);
writeoutput('年  ');
create_monthlist(monthnow);
writeoutput('月');
writeoutput('
 
" & i & "
" & i & "
" & i & "
" & i & "
 
");
}




Coldfusion 日历控件



Coldfusion 日历控件
#create_calendar()#






5D荣誉斑竹

职务:普通成员
等级:3
金币:10.0
发贴:751
注册:2001/5/21 21:43:30
#52003/7/9 1:19:41
帖个劫图出来,我的浏览起看不到样式。



VRFans

职务:版主
等级:4
金币:10.0
发贴:1353
注册:2001/6/5 21:34:18
#62003/7/9 12:46:20

图片如下:



s22

职务:版主
等级:4
金币:10.0
发贴:1634
注册:2004/12/19 13:06:46
#72003/7/9 14:47:45
看起来还是比较丑



雅痞公子

职务:普通成员
等级:3
金币:-3.0
发贴:732
注册:2003/3/27 23:16:34
#82003/7/9 15:11:30
要好看一点容易呀!去矢量版和PS版。



hmilymb

职务:普通成员
等级:1
金币:0.0
发贴:4
注册:2003/5/4 14:22:45
#92003/8/8 2:30:00
无情人真有情呀

正天提供好东东,

你的cfsky论坛原代码给我很多帮助,谢谢