在vfp中如何判断一个字符串所代表的星期数？

Question

dow( ) 函数
从日期表达式或日期时间表达式返回该日期是一周的第几天。语法DOW(dExpression | tExpression [, nFirstDayOfWeek])返回值类型数值型参数dExpression指定日期表达式。tExpression指定日期时间表达式。nFirstDayOfWeek指定一周的第一天。nFirstDayOfWeek 可以是下列某个值：nFirstDayOfWeek 说明 
0 DOW( ) 使用当前在“星期开始于”列表框中选定的日期，该列表框出现在“选项”对话框中的“国际”选项卡上。 
1 星期日。当省略 nFirstDayOfWeek 时这是默认值。它是早期 FoxPro 版本使用的一周的第一天。 
2 星期一 
3 星期二 
4 星期三 
5 星期四 
6 星期五 
7 星期六 

Answer 1

dow( ) 函数
从日期表达式或日期时间表达式返回该日期是一周的第几天。语法DOW(dExpression | tExpression [, nFirstDayOfWeek])返回值类型数值型参数dExpression指定日期表达式。tExpression指定日期时间表达式。nFirstDayOfWeek指定一周的第一天。nFirstDayOfWeek 可以是下列某个值：nFirstDayOfWeek 说明 
0 DOW( ) 使用当前在“星期开始于”列表框中选定的日期，该列表框出现在“选项”对话框中的“国际”选项卡上。 
1 星期日。当省略 nFirstDayOfWeek 时这是默认值。它是早期 FoxPro 版本使用的一周的第一天。 
2 星期一 
3 星期二 
4 星期三 
5 星期四 
6 星期五 
7 星期六 
所以有， 
   dow(ctod(01/02/2002))-1 ，0代表星期日 

Answer 2

先轉換為日期格式，再利用DOW()得到星期幾
dow(ttod(substr('20020102',1,4)+'/'+substr('20020102',5,2)+'/'+sbustr('20020102',7,2)))

Answer 3

谢谢！
我这样写的代码：
SET CENTURY On
SET DATE TO AMERICAN
lcmonth = str(7)
lcday = str(22)
lcYear = str(2002)
? cdow(CTOD(lcMonth+"/"+lcDay+"/"+lcYear))