Dim dif,i,s,d,m,h,ss,r dif = DateDiff("s",t,Now()) d = dif\(24*60*60) h = (dif-d*(24*60*60))\(60*60) m = (dif-d*(24*60*60) - h*(60*60))\60 ss = dif Mod 60
If d>0 and d<5 then r = d & "天前"
elseif d>=5 then r= t elseif h>0 then r= h & "小时前"
SqlConnection conn = CsDB.sqlcon(); SqlDataAdapter da = new SqlDataAdapter("select fwCoding from bjmuma_fwCoding where OrderNumber='" + Order + & ......
