1、本文是测试性的，可以通过程序直接新建表、创建字段等，但为了简便起见，我们先在万网会员中心，数据库管理里面，创建一个名为Tb_Talking的表，表中新建几个字段，如下图所示
2、通过FTP工具，在空间新建mytest文件夹，在mytest文件夹下，新建conn.asp和test.asp两个文件。
3、其中conn.asp文件夹下的内容为：<婊剧琏兄%Dim Conn,ConnStr,DataServer,DataBase,DataUser,DataPassDataServ髫潋啜缅er = "xxxxxx" //服务器IPDataBase = "xxxxxx" //数据库名DataUser = "xxxxxx" //用户名DataPass = "xxxxxx" //密码ConnStr="Provider=SQLOLEDB.1;User ID="&DataUser&";Password="&DataPass&";Initial Catalog="&DataBase&";Data Source="&DataServer&""Set conn=Server.CreateObject("ADODB.Connection")conn.ConnectionString=ConnStrconn.Open %>
4、//test.asp内容<%@LANGUAGE="VBSCRIPT" 觊皱筠桡CODEPAGE="936"%><%Session.CodePage=936%><%Response.Charset="gb2312"%><!--#include file="conn.asp"--><script language="javascript">function check(){ if(document.form1.say_anything.value=="") { alert("输入的内容不能为空!"); document.form1.say_anything.focus(); return false; } document.form1.ctype.value="add"; document.form1.submit();}</script><% currentTime="¤"&year(Now)&"-"&Month(Now)&"-"&day(Now)&" "&Hour(Now)&":"&Minute(Now)&":"&Second(Now) response.Write currentTime if trim(request("ctype"))="add" then session("say_anything")="" sql="insert into Tb_Talking(Content,Time) values('"&trim(request("say_anything"))&"','"+currentTime+"') " set rs=conn.execute(sql) end if%><html><head><title>test</title><link href="admin.css" type="text/css" rel="stylesheet"><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body style="text-align:center"><div class="div1"><table><tr><form action="" name="form1"><input type="hidden" name="ctype"> <td> <textarea name="say_anything" id="say" style="width:450; height:100; overflow:auto"></textarea> </td> <td> <input type="button" name="publish" onClick="check()" style=" height:30px; width:50px;" value="发表"></form> </td></tr></table></div><div style="margin:0 auto; width:500px"><% set rl=server.createobject("adodb.recordset") sqlres="Select * from Tb_Talking" rl.open sqlres,Conn,1,3 if not(rl.bof or rl.eof)then Do While Not rl.Eof%><table border="0" cellpadding="0" cellspacing="0"> <tr> <td><font color="#CCCCCC" face="Arial, Helvetica, sans-serif"><%=rl("Content")%></font></td> <td><font size="-1"><%=rl("Time")%></font></td> </tr> </table><br><br><% rl.MoveNext Loop%><%End if%></div></body></html>
5、test.asp中包含“<link href="admin.css" type="text/css" rel="stylesheet">”，简洁起见，admin.css的内容就不贴出来了。这一语句去掉也可以。查询和插入数据的js语句如下图所示：
6、最后在地址栏上输入www.域名/mytest/test.asp，结果如图所示
