'################################################
'## 功 能：获取文件名 ##
'## 输入参数：文件路径 ##
'## 输出参数：文件名 ##
'## 创建日期：2010-01-19 ##
'## 修改日期：2010-01-19 ##
'################################################
Function fun_GetBaseName()
Dim FSO
Set FSO=CreateObject("Scripting.FileSystemObject")
fun_GetBaseName=FSO.GetBaseName(fun_GetFileFullPath())
Set FSO=Nothing
End Function
如果加个回车会咋样
试试就知道 chr(10)
冒似不错的说
还好还好编辑的时候没有出现空行，只是在浏览的时候有
CSS设置
<style type="text/css">
.box {
border:#eee solid 1px;
width:300px;
height:120px;
line-height:120px;
display:table-cell;
vertical-align:middle;
text-align:center;
}
</style>
1.文本
<div class="box">Sample text</div>
Sample text
2.图片(IE下在图片后面加一 ......
阿里巴巴的一款滑动分类菜单,效果很不错,但是使用了较多的图片,不过这些图片只是背景,不影响你修改菜单的文字,所以很值得大家使用,代码稍嫌多,学习CSS的朋友好好研究一下.
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html ......
