ページングの計算は、何の判断もせずに一度で完了します。
引用した内容は以下の通りです。
intNumPage = Abs(Int(-(intNumRecord/intPerPage)))
日付を RFC822 形式にフォーマットします。前の方法は面倒でした。この簡単な方法を見てください。
引用した内容は以下の通りです。
関数 DateToRFC822(byVal dtaVal)
ディム strCurLocale : strCurLocale = GetLocale()
SetLocale(英語)
dtaVal = CDate(dtaVal)
DateToRFC822 = WeekdayName(Weekday(dtaVal),True)&,&_
右(0&日(dtaVal),2)& &_
MonthName(Month(dtaVal),True)& &_
年(dtaVal)& &_
右(0&時間(dtaVal),2)&:&_
右(0&分(dtaVal),2)&:& _
右(0&秒(dtaVal),2)& & _
+0800
SetLocale(strCurLocale)
終了機能