增加了两种方式，时间-随机4位数字+id，类似20081217-87643882.shtml和20081217-87643882目录样式，修改时间后面的参数2008-12-17/82.shtml可以组合出2008-12/643882.shtml这样的目录形式
20090107修改了Article的一些错误，详细看下面
打开page/system/fun.asp，增加一个随机函数
function saltnum(l1)
dim l2,l3,i
l2="0123456789"
l3=len(l2)
randomize
for i=1 to l1
saltnum=saltnum&mid(l2,round((rnd*(l3-1))+1),1)
next
end function
Article文章模块打开admin/article/index.asp
if king.ismethod=false then
data(1,0)=1
'data(8,0)=kc.lang("common/pinyin")
'Change By Ash
data(8,0)=formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("king__products_list","listid")&king.neworder("king__products_page","kid")&"."&split(king_ext,".")(1)上面这段是product模块的，修正的Article模块的版本在这(2009-01-07修改)
if king.ismethod=false then
data(5,0)=1
'data(11,0)=art.lang("common/pinyin")
'Ash Change
data(11,0)=formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("kingart_list","listid")&king.neworder("kingart","artid")&"."&split(king_ext,".")(1)
end if'if len(artid)=0 then
maxartid=king.neworder("kingart","artid")
Il king.form_eval("artpath",maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("artpath",formatdate(now,"yyyyMM")&"/"&saltnum(4)&maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("artpath",formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("kingart_list","listid")&maxartid)
'end if橙色部分是2009-01-07修改部分
Products Search查找'kpath
Il "<p><label>"&kc.lang("label/fpath")&"</label><input maxlength=""255"" type=""text"" name=""kpath"" id=""kpath"" value="""&formencode(data(8,0))&""" class=""in4"" />"
'if len(kid)=0 then
'‘注释掉了id判断，在文章修改的时候也显示，
maxkid=king.neworder("king__products_page","kid")
Il king.form_eval("kpath",maxkid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,2)&"/"&maxkid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,"yyyyMM")&"/"&saltnum(4)&maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("king__products_list","listid")&maxkid)
Il king.form_eval("kpath",formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("king__products_list","listid")&maxkid&"."&split(king_ext,".")(1))
'end if
Il " <a href=""javascript:;"" onclick=""javascript:document.getElementById('kpath').value=document.getElementById('ktitle').value"">["&kc.lang("common/accord")&"]</a>"
Il king.form_eval("kpath",kc.lang("common/pinyin"))
Il king.form_eval("kpath","MD5")
Il king.check("kpath|6|"&encode(kc.lang("check/path"))&"|1-255;kpath|15|"&encode(kc.lang("check/path1"))&checkpath)
Il "</p>"
OO部分的修改
'if len(kid)=0 then
maxkid=king.neworder("king__{OO}_page","kid")
Il king.form_eval("kpath",maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,2)&"/"&maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,"yyyyMM")&"/"&saltnum(4)&maxartid&"."&split(king_ext,".")(1))
Il king.form_eval("kpath",formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("king__{OO}_list","listid")&maxkid)
Il king.form_eval("kpath",formatdate(now,"yyyyMMdd")&"-"&saltnum(4)&king.neworder("king__{OO}_list","listid")&maxkid&"."&split(king_ext,".")(1))
'end if
