怎么实现论坛发图片,上传图片,文件等功能
求助,怎么实现论坛发图片,上传图片,文件,等功能(在DW中)[此贴子已经被作者于2005-10-16 19:01:18编辑过]
2005-10-16 18:57
2005-10-16 20:56
2005-10-16 23:02
2005-10-18 13:33
2005-10-18 19:20
这是我发表留言的页面，如果我只要定仪一个发表留言的文本域，是不是该这么添加？ <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>无标题文档</title> </head>
<body> <form name="form1" id="form1" method="post" action=""> <table width="760" border="1"> <tr> <td width="91">您的大名</td> <td width="653"><input name="name" type="text" id="name" /></td> </tr> <tr> <td>E_Mail</td> <td><input name="email" type="text" id="email" /></td> </tr> <tr> <td>个人主页</td> <td><input name="homepage" type="text" id="homepage" /></td> </tr> <tr> <td height="20">文章标题</td> <td><input name="title" type="text" id="title" /></td> </tr> <tr> <td height="161">文章内容</td> <td><textarea name="content" cols="70" rows="10" id="content"></textarea></td> </tr> </table> <table width="760" border="1"> <tr> <td> </td> <td> </td> </tr> </table> <p> </p> <% function ubb_img(string) dim start start=1
do while(start<=len(string)) dim pnt1,pnt2,str pnt1=instr(string,start,"【IMG】") if pnt1>0 the pnt2=instr(string,pnt1+5,"【/IMG】") if pnt2>0 then str=mid(string,pnt1+5,pnt2-pnt1-5) string=replace(string,"【IMG】"&str&"【/IMG】","<IMG src='"&str&"' border='0'>") start=pnt2+6 else exit do end if else exit do end if loop ubb_img=string end function %>
</form> </body> </html>
2005-10-18 22:40
2005-10-19 00:26
2005-10-20 15:51