标题:[求助]文本框和下拉菜单写进数据库问题
只看楼主
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
我把所有代码都贴出来,请大家帮助。


<!--#include file="../../../../Inetpub/wwwroot/Item2/conn.asp" -->
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>增加ITEM</title>
</head>
<body>
<form name="addform" method="get" action="../../../../Inetpub/wwwroot/Item2/itemsave.asp" onSubmit="return submitit();">
<div align="center"></div>

<table width="70%" border="0" bgcolor="#FFFFFF" align="center">
<tr>
<td height="131"> <table width="95%" height="637" border="0">
<tr>
<td width="98%" height="176" bgcolor="#3B3B3B">
<div align="left"></div></td>
</tr>
<tr>
<td height="52" bgcolor="#006666">&nbsp;</td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <p align="left"><font size="5" face="楷体_GB2312">Product</font>
<font size="1">
<select name="product1" size="1" id="select">
<option selected>请选择测试产品</option>
<%do while not rs1.eof%>
<option value="<%=rs1("ProjectName")%>"><%=rs1("ProjectName")%></option>
<%rs1.movenext
loop
%>
</select>
</font> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
<font size="5" face="楷体_GB2312">Customer </font>
<select name="customer" size="1" id="customer">
<option value="" selected>请选择相对应客户</option>
<% sql="select * from info_testitem order by projectCustomer"
set rs1=server.createobject("adodb.recordset")
rs1.open sql,conn,3,2
do while not rs1.eof %>
<option value="<%=rs1("ProjectCustomer")%>"><%=rs1("ProjectCustomer")%></option>
<% rs1.movenext
loop
rs1.close %>
</select>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </p></td>
</tr>
<tr>
<td height="36" bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td height="30" bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td height="35" bgcolor="#CCCCCC"><font size="5" face="楷体_GB2312"><SPAN
class=main1><font color="#000000">Description</font></SPAN>:</font></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"><textarea name="textarea" cols="150" rows="9" wrap="VIRTUAL"></textarea></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <div align="center">
<input name="Submit" type="submit" id="Submit2" value="Submit">
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;
<input type="button" name="Submit4" value="Return">
</div></td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
</table>
<div align="center"></div></td>
</tr>
</table>
<div align="left"></div>
<div align="center"></div>
</form>
</body>
</html>
2007-06-06 15:04
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
怎么我贴出来要运行代码才可以。

我也把图片上传上来给大家看。

[此贴子已经被作者于2007-6-6 15:07:52编辑过]

2007-06-06 15:05
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
我把代码很截图方式上传上来吧。这样方便大家帮助我分析原因。


2007-06-06 15:13
lq7350684
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:5089
专家分:98
注 册:2006-11-6
得分:0 
2007-06-06 15:15
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
以下是引用lq7350684在2007-6-6 15:15:50的发言:

有什么问题吗?大侠。。

不然用什么方法了。

点一下图片后,会在新的窗口打开。就可以看的明白了。

[此贴子已经被作者于2007-6-6 15:18:54编辑过]

2007-06-06 15:17
lq7350684
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:5089
专家分:98
注 册:2006-11-6
得分:0 
我看不见你的代码.
2007-06-06 15:18
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
以下是引用lq7350684在2007-6-6 15:18:36的发言:
我看不见你的代码.


那怎么办了。
我把代码直接copy到论坛里面,出现非法字符,
要不我直接把它打包放在上面吧。

EoGzPPpL.rar (5.96 KB) [求助]文本框和下拉菜单写进数据库问题


2007-06-06 15:33
lq7350684
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:5089
专家分:98
注 册:2006-11-6
得分:0 

你那个"请选择测试产品"应该显示不出来吧.
你那rs1怎么在下面事例化了啊.
我给你改了一下,但是肯定不对,因为我不知道测试产品是从哪个表调数据的.但是样子就是这样的,你把表什么的改一下.
还有你少了一个submitit()函数.就是那个
<form name="addform" method="get" action="../../../../Inetpub/wwwroot/Item2/itemsave.asp" onSubmit="return submitit();">



[QUOTE]<!--#include file="../../../../Inetpub/wwwroot/Item2/conn.asp" -->
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>增加ITEM</title>
</head>
<body>
<form name="addform" method="get" action="../../../../Inetpub/wwwroot/Item2/itemsave.asp" onSubmit="return submitit();">
<div align="center"></div>

<table width="70%" border="0" bgcolor="#FFFFFF" align="center">
<tr>
<td height="131"> <table width="95%" height="637" border="0">
<tr>
<td width="98%" height="176" bgcolor="#3B3B3B">
<div align="left"></div></td>
</tr>
<tr>
<td height="52" bgcolor="#006666">&nbsp;</td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <p align="left"><font size="5" face="楷体_GB2312">Product</font>
<font size="1">
<select name="product1" size="1" id="select">
<option value="" selected>请选择测试产品</option>
<%
set rs1=server.createobject("adodb.recordset")
sql1="select * from info_testitem order by projectCustomer"
rs1.open sql1,conn,1,1
do while not rs1.eof%>
<option value="<%=rs1("ProjectName")%>"><%=rs1("ProjectName")%></option>
<%rs1.movenext
loop
rs1.close
%>
</select>
</font> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
<font size="5" face="楷体_GB2312">Customer </font>
<select name="customer" size="1" id="customer">
<option value="" selected>请选择相对应客户</option>
<%
set rs2=server.createobject("adodb.recordset")
sql2="select * from info_testitem order by projectCustomer"
rs2.open sql2,conn,1,1
do while not rs2.eof %>
<option value="<%=rs2("ProjectCustomer")%>"><%=rs2("ProjectCustomer")%></option>
<% rs2.movenext
loop
rs2.close %>
</select>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </p></td>
</tr>
<tr>
<td height="36" bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td height="30" bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td bgcolor="#CCCCCC">&nbsp;</td>
</tr>
<tr>
<td height="35" bgcolor="#CCCCCC"><font size="5" face="楷体_GB2312"><SPAN
class=main1><font color="#000000">Description</font></SPAN>:</font></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"><textarea name="textarea" cols="150" rows="9" wrap="VIRTUAL"></textarea></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <div align="center">
<input name="Submit" type="submit" id="Submit2" value="Submit">
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;
<input type="button" name="Submit4" value="Return">
</div></td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
</table>
<div align="center"></div></td>
</tr>
</table>
<div align="left"></div>
<div align="center"></div>
</form>
</body>
</html>[/QUOTE]


[此贴子已经被作者于2007-6-6 15:47:58编辑过]

2007-06-06 15:46
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
你那个"请选择测试产品"应该显示不出来吧.
你那rs1怎么在下面事例化了啊.
我给你改了一下,但是肯定不对,因为我不知道测试产品是从哪个表调数据的.但是样子就是这样的,你把表什么的改一下.
还有你少了一个submitit()函数.就是那个
<form name="addform" method="get" action="../../../../Inetpub/wwwroot/Item2/itemsave.asp" onSubmit="return submitit();">

“请选择测试产品”是下拉菜单默认选项,怕有人不明白那个框要做什么。所以就出现一个提示。这样子。

不过按照你给你方式,好像还是没有用。呵呵。

2007-06-06 16:35
clarksjtv
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2007-5-28
得分:0 
终于搞定了,原来是软件环境问题,我以前是用的windows2003+SQL2000,没有办法,我今天换成Windows2000+SQL2000,就可以了。谢谢lq7350684版主的技术支持。

<%
set rs2=server.createobject("adodb.recordset")
sql2="select * from info_testitem order by projectCustomer"
rs2.open sql2,conn,1,1
do while not rs2.eof %>
<option value="<%=rs2("ProjectCustomer")%>"><%=rs2("ProjectCustomer")%></option>
<% rs2.movenext
loop
rs2.close %>
2007-06-11 15:32



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-143876-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.208261 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved