<%
function cutstr(tempstr,tempwid)
if len(tempstr)>tempwid then
cutstr=left(tempstr,tempwid)&"..."
else
cutstr=tempstr
end if
end function%>
欢迎光临国土资源部大陆动力学重点实验室、国际大陆科学钻探中国委员会网站！(Welcome to website of Continental Dynamics
Lab, MLR, ICDP-CHINA and CCSD!)
