107706_zh-CN

liliconcom

需要将十进制日期时间转换为ddMONYY

我正在使用日期时间提示来提取我的SQL查询的开始日期和结束日期。  日期提示使用小数。  如何将小数转换为ddMonyy格式。  我的代码如下。  您将在我的选择中看到我有t1.Login_Date，变量为startDT，t1.Login_Date为变量endDT。  这是我需要将小数转换为日期的地方。  我已经尝试过Cast和转换，并且两者都在一起，无法让它工作。  任何帮助将不胜感激。

 

NamesDefaultToHere（1）;

//由Vince Faller撰写

Re：需要将十进制日期时间转换为ddMONYY我能够将您的建议纳入我的代码中。谢谢您的帮助。Re：需要将十进制日期时间转换为ddMONYY

这是一个简单的例子来进行你想要的转换

Names Default To Here( 1 );

theDate = Today();

charDate = Uppercase( Format( theDate, "ddmonyyyy" ) );
Show( charDate );

finalDate = Substr( charDate, 1, 5 ) || Substr( charDate, -2 );
Show( finalDate );

Re：需要将十进制日期时间转换为ddMONYY

NamesDefaultToHere（1）;

//由Vince Faller撰写
//使日历出现在numeditbox上（默认为现在）
//注意，这仅适用于JMP 11或更高版本
dateBox =功能（
{timething =今天（）}，
{} newbox，
newbox = Eval（
替代（
名称Expr（
号码编辑框（
timething，// Eval（Sub（））因为JMP怪癖
10，//只需要这个，因为JMP没有默认宽度
<<设定功能（
功能（{self}，
{}，
如果（缺失（自我）获得，
self << Set（Eval（DUMMY））//将日期设置为timething参数
）
）
）
<<设置格式（格式（“m / d / yh：m：s”，23,0））; //使框的日期时间格式（给出日历）
）
）
Expr（DUMMY），时间
）
）;
newbox;
）;

nw =
新窗口（“输入日期范围”，
LineUpBox（NCOL（2），
TextBox（“Start DateTime”），start = dateBox（Today（） - InDays（12）），
TextBox（“End DateTime”），end = dateBox（），
ButtonBox（“取消”，nw <<关闭窗口），ButtonBox（“获取数据”，runScript）
））;



runScript = Expr（nw <<关闭窗口;