方寸心思

去5499搞个免费吧..我都有个

听说余庆发生了甲型H1N1流感，不知道有多严重！~~你们是否过得还好啊！~好想你们哦！~

上海保洁公司
[url=http://www.fu-li-cai-piao.net.cn/上海福利彩票时时乐.htm]上海福利彩票时时乐[/url] [url=http://www.fu-li-cai-piao.com]3d开奖号码[/url] [url=http://www.fu-li-cai-piao.com]3d试机号[/url] [url=http://www.fu-li-cai-piao.com]3d预测[/url] [url=http://www.fu-li-cai-piao.com]3d开奖[/url] [url=http://www.pai-lie-3.cn/体育彩票排列3.htm]体育彩票排列3[/url] [url=http://www.pai-lie-3.cn/体育彩票排列5.htm]体育彩票排列5[/url] [url=http://www.pai-lie-3.cn]上海体育彩票[/url] [url=http://www.pai-lie-3.cn]上海福利彩票[/url] [b][url=http://www.010-114.com.cn/上海地毯清洗.htm]上海地毯清洗[/url][/b] [h1][url=http://www.010-114.com.cn]上海保洁公司[/url][/h1] [i][b][url=http://www.021diaoche.com/]二手压路机[/url][/b][/i]

罗老师您好：以前的那个站我没有开了，由于服务器问题，现在新开的遵义电影站，麻烦你帮我把以前的那个友情换过来好吗？谢谢您！新站LOGO：http://www.zydyz.cn/SkinS/Blue/Images/logo.png
地址是：http://www.zydyz.cn/
再次感谢！

罗老师最近在忙什么,冒似留言都没有看到你回复哈!

申请一个点 net 的域名要多少钱一个月，在那一个网上申请最好啊！~！~最好要少一点的钱！~！~！~

申请一个点 net 的域名要多少钱一个月，在那一个网上申请最好啊！~！~最好要少一点的钱！~！~！~

罗老师：最近可好，看到你结婚了，恭喜~~

0 then
if file.filesize>1000*photoSize Then 'ÏÞÖÆͼƬÉÏ´«´óС
response.write "ͼƬ´óС³¬¹ýÁËÏÞÖÆ("&photoSize&"KB)[ÖØÐÂÉÏ´«]"
response.end
end If
uploadsuc=false
end if

filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&file.FileName

if file.FileSize>0 then ''Èç¹û FileSize > 0 ˵Ã÷ÓÐÎļþÊý¾Ý
file.SaveAs Server.mappath(formpath&filename) ''±£´æÎļþ
path=Server.mappath(formpath&filename)
fileExt=Split(path,".")(UBound(Split(path,".")))
path1=Replace(path,"."&fileExt,"")&"_1."&fileExt
filenameS=Replace(filename,"."&fileExt,"")&"_1."&fileExt
If upFolder"link" then
If jpegok=True Then
If isjpeg=True then
Call makePicSmall(path,path1)
issmallpic=true
End If
End If
End if
response.write "ÉÏ´«³É¹¦ Çë·µ»Ø"
end if
next

Response.Write "parent.add.title.value='"& Replace(file.filename,"."&fileExt,"") &"'"
If issmallpic=True then
Response.Write "parent.add.pathsmall.value='UpFile/"& upFolder &"/"&filenameS&"'"
Else
Response.Write "parent.add.pathsmall.value='UpFile/"& upFolder &"/"&filename&"'"
End If
Response.Write "parent.add."& inputName &".value='UpFile/"& upFolder &"/"&FileName&"'"
set upload=nothing
%>

罗老师你好！学生有个问题想请教一下你，为什么在asp网站中，不能上传照片，好像找不那个控件，怎么办啊！能不能添加那个控件啊！请老师指点。上传时提示出错：icrosoft VBScript 运行时错误 '800a01ad'
ActiveX 部件不能创建对象: 'Server.CreateObject'
adminupfile.asp, line 31
Host by NetBox Version 2.8 Build 4128
0 then
if file.filesize>1000*photoSize Then 'ÏÞÖÆͼƬÉÏ´«´óС
response.write "ͼƬ´óС³¬¹ýÁËÏÞÖÆ("&photoSize&"KB)[ÖØÐÂÉÏ´«]"
response.end
end If
uploadsuc=false
end if

filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&file.FileName

if file.FileSize>0 then ''Èç¹û FileSize > 0 ˵Ã÷ÓÐÎļþÊý¾Ý
file.SaveAs Server.mappath(formpath&filename) ''±£´æÎļþ
path=Server.mappath(formpath&filename)
fileExt=Split(path,".")(UBound(Split(path,".")))
path1=Replace(path,"."&fileExt,"")&"_1."&fileExt
filenameS=Replace(filename,"."&fileExt,"")&"_1."&fileExt
If upFolder"link" then
If jpegok=True Then
If isjpeg=True then
Call makePicSmall(path,path1)
issmallpic=true
End If
End If
End if
response.write "ÉÏ´«³É¹¦ Çë·µ»Ø"
end if
next

Response.Write "parent.add.title.value='"& Replace(file.filename,"."&fileExt,"") &"'"
If issmallpic=True then
Response.Write "parent.add.pathsmall.value='UpFile/"& upFolder &"/"&filenameS&"'"
Else
Response.Write "parent.add.pathsmall.value='UpFile/"& upFolder &"/"&filename&"'"
End If
Response.Write "parent.add."& inputName &".value='UpFile/"& upFolder &"/"&FileName&"'"
set upload=nothing
%>
//==============================
ASP如果上传文件需要组件的支持，也许是服务器没有安装