function DoDateTime(str, nNamedFormat, nLCID) dim strRet dim nOldLCID strRet = str If (nLCID > -1) Then oldLCID = Session.LCID End If On Error Resume Next If (nLCID > -1) Then Session.LCID = nLCID End If If ((nLCID < 0) Or (Session.LCID = nLCID)) Then strRet = FormatDateTime(str, nNamedFormat) End If If (nLCID > -1) Then Session.LCID = oldLCID End If DoDateTime = strRet End Function 香道具知识
首页
龙文堂
龟文堂
日本香道具
日本花道具
京铁壶目录
铁壶地方系
南部铁壶
铁壶知识
花道具知识
香道具知识
在线留言
联系我们
公司 世依堂株式会社
573252525(可中文通话) 
0081 03-5876-5718
传真 0081 03-5876-5718
邮箱 seidouantique@yahoo.co.jp
联系人 前田
〒125-0052 東京都葛飾区柴又1-43-6 MAC柴又コート10
 
 
香道具知识
空熏
日本香道概略
日本香道历史(三)
日本香道历史(二)
日本香道历史(一)
现在共有5条1,本页显示第1到第5条.
版权所有:日本铁壶网 最 佳分辨率分辨率:1024*800 技术支持:沈阳志鼎科技
Copyright © 2010 JPTIEHU.COM Corporation, All Rights Reserved