方寸心思

申请一个点 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如果上传文件需要组件的支持，也许是服务器没有安装

你的留言板也很有特色，是自己另做的么？还是用的插件？
//--------------------------------------------------
DMSGuestbook 插件

您好，很喜欢您相册文章里面用来显示图片的插件，是什么插件可以告诉我么？
//-------------------------------------------------------------------
NextGEN Gallery

罗老师：帮我测一下这个可以吗？女：1981年8月初六辰时和男：1981年9月16巳时
//---------------------------------------------------------------------------
请告知历法：8月初六是农历，9月16呢

罗老师：最近可好？来您的网站发现一个问题，您网站的首页打开时右边在下边和左边不在一起，是不是IE的问题呢？还是网站本身问题？
//----------------------------------------------------------------------------
IE6的问题，IE7,FireFox,Opera都没有问题

罗老师你好!
首先祝贺你告别单身进入幸福的家园!
然后真有些对不起,你结婚时我没能来到,最后才听说,学生有些失礼.
现在一切很好吧!回来时来看你!