我想知道在这如果请人把asp修改成aspx,会不会有人作答~~ RT。 asp压根不熟悉~ 有人帮忙吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 选择性无视3楼。 2楼麻烦您了。代码如下.. <%If Request("proadd")=1 thenfunction HTMLEncode(fString)if not isnull(fString) then fString = replace(fString, ">", ">") fString = replace(fString, "<", "<") fString = replace(fString, """", """) fString = Replace(fString, CHR(32), " ") fString = Replace(fString, CHR(9), " ") fString = Replace(fString, CHR(34), """) fString = Replace(fString, CHR(39), "'") fString = Replace(fString, CHR(13), "") fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ") fString = Replace(fString, CHR(10), "<BR> ") HTMLEncode = fStringend ifend function'------------------检查数据是否为空---------------------------xh=trim(Request("xh"))if xh="" then xh="F"else xh=xhend iftj=trim(Request("tj"))if tj="" then tj="F"else tj=tjend if'-----------------将内容写入数据库--------------------------------------Set rs=Server.CreateObject("ADODB.Recordset")sql="select * from products"rs.open sql,conns,1,3rs.addnewrs("model")=trim(Request("pkh"))rs("pro")=trim(Request("ppm"))rs("fabric")=trim(Request("pml"))rs("lining")=trim(Request("pll"))rs("pimg")=trim(Request("ad1"))rs("art")=trim(Request("pgy"))rs("xtid")=trim(Request("pclass"))rs("xsid")=trim(Request("pstyle"))rs("xh")=xhrs("tj")=tjrs("prgm")=trim(Request("pdbl"))rs("fob")=trim(Request("pfob"))rs.Updaters.CloseSet rs=Nothingresponse.Redirect("products.asp")End if %> 不幽默,我寂寞。 求帮忙,坐等asp改aspx大神。 这就是一个向数据库存储的过程.NET按照自己的需求写就是了 直接把.asp改成.aspx不就行了吗。哈哈 点击选中 asp 文件,再按 “F2” 在文件名末尾加一个 ”x“ 就好了 把asp的html控件都给成服务器控件就可以了 if(int.Parse(Request.QueryString["proadd"]==1){String xh =Request.QueryString["xh"].Trim();if(xh=="") xh="F"String tj=Request.QueryString["tj"].Trim();if(tj=="") tj="F"/*Set rs=Server.CreateObject("ADODB.Recordset")//数据库连接sql="select * from products"//查这个表数据rs.open sql,conns,1,3*///如他的SQL = update table set model=@model;string model= Request.QueryString["pkh"].trme();string sql = "update table set model="+model;//response.Redirect("products.asp") Response.Redirect("products.aspx"); } public string HTMLEncode(string fString) {if(fString==null || fString == ""){ return fString;} // fString = replace(fString, ">", ">") fString = fString .Replace(">",">");//字符串替换自己写完 return fString; }/*Set rs=Server.CreateObject("ADODB.Recordset")//数据库连接sql="select * from products"//查这个表数据rs.open sql,conns,1,3*//*rs("model")=trim(Request("pkh")) 付值rs("pro")=trim(Request("ppm"))rs("fabric")=trim(Request("pml"))rs("lining")=trim(Request("pll"))rs("pimg")=trim(Request("ad1"))rs("art")=trim(Request("pgy"))rs("xtid")=trim(Request("pclass"))rs("xsid")=trim(Request("pstyle"))rs("xh")=xhrs("tj")=tjrs("prgm")=trim(Request("pdbl"))rs("fob")=trim(Request("pfob"))rs.Update //更新数据rs.Close //关闭数据Set rs=Nothingresponse.Redirect("products.asp")End if*/大概就这样!你照着葫芦画瓢就行了! windows的任务管理器那样的界面用到哪些控件 XML分析特殊符号的问题。。。 从 DataGridView 拖动到 TreeView 上去以后,TreeView 上面的 mousemove 捕获不到事件 100分求全国省市地区名称数据库 我建了一个asp.net C# 群 大家一起来学习 ADO连接返回数据出错 高手指教 短信发送问题 请装了VS.Net2003正式版的朋友进来一下,请问版本号是多少? 这个问题我不太明白??? C#关于OPC开发DCOM出问题了 用vs2008打包软件不含.net framwork vs2010 请问这正常吗?
选择性无视3楼。 2楼麻烦您了。代码如下..
<%
If Request("proadd")=1 thenfunction HTMLEncode(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = replace(fString, """", """)
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR> ")
HTMLEncode = fString
end if
end function'------------------检查数据是否为空---------------------------
xh=trim(Request("xh"))
if xh="" then
xh="F"
else
xh=xh
end if
tj=trim(Request("tj"))
if tj="" then
tj="F"
else
tj=tj
end if'-----------------将内容写入数据库--------------------------------------Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from products"
rs.open sql,conns,1,3
rs.addnew
rs("model")=trim(Request("pkh"))
rs("pro")=trim(Request("ppm"))
rs("fabric")=trim(Request("pml"))
rs("lining")=trim(Request("pll"))
rs("pimg")=trim(Request("ad1"))
rs("art")=trim(Request("pgy"))
rs("xtid")=trim(Request("pclass"))
rs("xsid")=trim(Request("pstyle"))
rs("xh")=xh
rs("tj")=tj
rs("prgm")=trim(Request("pdbl"))
rs("fob")=trim(Request("pfob"))
rs.Update
rs.Close
Set rs=Nothing
response.Redirect("products.asp")
End if
%>
不幽默,我寂寞。 求帮忙,坐等asp改aspx大神。
就可以了
if(int.Parse(Request.QueryString["proadd"]==1)
{String xh =Request.QueryString["xh"].Trim();
if(xh=="")
xh="F"
String tj=Request.QueryString["tj"].Trim();
if(tj=="")
tj="F"/*Set rs=Server.CreateObject("ADODB.Recordset")//数据库连接
sql="select * from products"//查这个表数据
rs.open sql,conns,1,3
*///如他的SQL = update table set model=@model;
string model= Request.QueryString["pkh"].trme();
string sql = "update table set model="+model;
//response.Redirect("products.asp")
Response.Redirect("products.aspx");
}
public string HTMLEncode(string fString)
{
if(fString==null || fString == "")
{ return fString;
}
// fString = replace(fString, ">", ">")
fString = fString .Replace(">",">");//字符串替换自己写完
return fString; }
/*Set rs=Server.CreateObject("ADODB.Recordset")//数据库连接
sql="select * from products"//查这个表数据
rs.open sql,conns,1,3
*/
/*rs("model")=trim(Request("pkh")) 付值
rs("pro")=trim(Request("ppm"))
rs("fabric")=trim(Request("pml"))
rs("lining")=trim(Request("pll"))
rs("pimg")=trim(Request("ad1"))
rs("art")=trim(Request("pgy"))
rs("xtid")=trim(Request("pclass"))
rs("xsid")=trim(Request("pstyle"))
rs("xh")=xh
rs("tj")=tj
rs("prgm")=trim(Request("pdbl"))
rs("fob")=trim(Request("pfob"))
rs.Update //更新数据
rs.Close //关闭数据
Set rs=Nothing
response.Redirect("products.asp")
End if
*/大概就这样!
你照着葫芦画瓢就行了!