5设计处理表单数据的3p程序
5.1设计处理表单数据的ASP程序 form_cl.asp 建立与数据库的连接:这里采用直接驱动法 Set conn = Server.CreateObject("ADODB.Connection"); conn.open "driver={MySQL};server=localhost;uid=user;pwd=xxxxxx;database=tradedb" 获取表单提交的数据: data1=request("ptwbk");data2=request("mmwbk");data3=request("gdwbk") data4=request("dxk");data5=request("fxk");data6=request("lbk") 用SQL语句对数据库进行操作 查询数据记录: sql="select * from tablename" ;set rs=conn.execute(sql) " 增加数据记录: sql="insert into tablename(ptwbk,mmwbk,gdwbk,dxk,fxk,lbk) values('data1','data2','data3','data4','data5', 'data5')"; set rs=conn.execute(sql) 更改某条数据记录: sql="update tablename set data1="request(ptwbk )", where ID="num"; set rs=conn.execute(sql) 删除某条数据记录: sql="delete from tablename where ID="num";set rs=conn.execute(sql) 将SQL语句处理的数据结果输出 Response.Write "
" Response.Write " " For i=0 to rs.Fields.Count-1 Response.WRITE " " & rs.Fields(i).Name & " " Next Response.Write "
" While Not rs.EOF Response.Write " " For i=0 to rs.Fields.Count-1 Response.WRITE " " & rs.Fields(i).Value & " " Next Response.Write "
|