首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > Ajax >

又是一个XJAX值有关问题,小弟我这里如何不能自动保存在数据库,少了一个自动触发的货

2013-04-21 
又是一个XJAX值问题,我这里怎么不能自动保存在数据库,少了一个自动触发的货?3_upload_update.asp%OPTION

又是一个XJAX值问题,我这里怎么不能自动保存在数据库,少了一个自动触发的货?
3_upload_update.asp
<%OPTION EXPLICIT%>
<%Server.ScriptTimeOut=5000%>
<!--#include FILE="upload_5xsoft.inc"-->
<html>
<head>
<title>文件上传</title>
</head>
<body>
<%
dim upload,file,formName,formPath,iCount,filesize,czz
set upload=new upload_5xsoft ''建立上传对象
czz=upload.form("czz")
formpath="../ajax/picture/"
for each formName in upload.objFile ''列出所有上传了的文件
 set file=upload.file(formName)  ''生成一个文件对象
next

    file.FileName=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)'重命名
     file.fileext=".bmp"
  file.SaveAs Server.mappath(formPath&file.FileName&file.Fileext)   ''保存文件
                response.write ("<a href='del_lofar.asp?pic="&File.FileName&file.filEext&"&czz="&czz&"'>删除图片</a>")
   response.write "<script language=javascript>parent.document.getElementById('"&czz&"').value='../picture/"&File.FileName&file.filEext&"'</script>"这里的值传到plan2.asp时能看得到,但是不保存,是怎么一情况?是modify_ajax_yc.js文件写得不对?还是缺少一个触发?
%>
</body>
</html>
plan2.asp


<!-- #include file="adoconn.asp" -->

<%
'=========================================
'功能:ajax实现无刷新对数据库的操作
'有添加、删除、修改、分页
'使用的是jquery框架
'作者:wangsdong
'来源:www.aspprogram.cn
'友情下载:脚本之家(http://www.jb51.net)
'文章为作者原创,转载请注明文章出处、保留作
'者信息,谢谢支持!
'=========================================

'此为后台文件
Response.CacheControl = "no-cache"
response.addheader"content-type","text/html;charset=gb2312"
id=request("id")
set rs=server.CreateObject("adodb.recordset")
   act=request("act")   
   if act="" or act="add" then
     call add()
   elseif act="list" then
      call manage()
   elseif act="del" then
      call del()
   elseif act="modify" then
      call modify()
   ElseIf act="edit" Then
      Call edit()
   end If
sub del() '删除

   page=request("page")
   sql="delete from shuisheng where object_id="&id
   conn.execute(sql)   
   Call manage()   
end sub
   
sub add() '添加
ph = VbsUnEscape(request("ph"))
    imagee = request("imagee")

qita = request("qita")
sql="select * from shuisheng where object_id=null"
rs.open sql,conn,1,3
rs.addnew
rs("ph")=ph
rs("imagee")=imagee

rs.update
rs.close 
Call manage()
end sub   
sub manage()  '分页   
%>
<%
sql="select object_id,ph,imagee from shuisheng order by object_id desc"
rs.open sql,conn,1,1
k=1
If rs.eof Then
Else
    rs.pagesize=5
    page=request("page")


    If Not Isnumeric(page) or page="" Then
      page=1
    else
      page=cint(page)
    End if
    if page<1 then page=1
    if page>rs.pagecount then page=rs.pagecount
    rs.AbsolutePage = page

    for i=1 to rs.pagesize
    object_id = rs("object_id")
    ph = rs("ph")
   imagee = rs("imagee")
    '******************下面是你要显示的******************'
if i mod 2= 0 then
  bgcolor="#eeeeee"
else
  bgcolor="#ffffff"
end if
response.write ("<table width='900' border='0'><tr><td bgcolor='#999999'><table width='78' cellpadding='1' cellspacing='1' bordercolor='#000000' bgcolor='#666666'><tr><td width='70' bgcolor='#00FF33'><div align='center'>批号</div></td></tr><tr><td bgcolor='#00FF33' width='70'><p align='center'><span id=""gname300"&object_id&""" name=""gname300"&object_id&"""><input tqitae=""text""  size=""5"" value="&ph&" maxlength=""20""  style=""border:1px solid #FFFFFF; text-align:center; ime-mode:Disabled; color:#800000; font-weight:bold;text-align:center; padding-left:4px; padding-right:4px; padding-top:1px; padding-bottom:1px; background-color:#FFFFFF; cursor:hand;"" onClick=""forder1('"&object_id&"','"&ph&"','shuisheng','ph','object_id','gname300');""></span></p></td></tr></table></td><td><iframe src=""2_upload.asp?czz=imagee"&k&""" width=""550"" height=""50"" frameborder=0 scrolling=no></iframe><span id=""gname500"&object_id&""" name=""gname500"&object_id&"""><input tpye=""text""  id=""imagee"&k&"""  size=""5"" value="&imagee&" maxlength=""20""  style=""border:1px solid #FFFFFF; text-align:center; ime-mode:Disabled; color:#800000;  font-weight:bold; padding-left:4px; padding-right:4px; padding-top:1px; padding-bottom:1px; background-color:#FFFFFF; cursor:hand;"" onClick=""forder2('"&object_id&"','"&imagee&"','shuisheng','imagee','object_id','gname500');""></span></td><td width='70' bgcolor='#999999'><table width='3' cellpadding='1' cellspacing='1' bordercolor='#000000' bgcolor='#666666'></table></td></tr></table>")
    '******************上面是你要显示的******************'
    rs.movenext
k=k+1
    if rs.eof then
      Exit For
    End if
    next
response.write "<tr><td height=""22"" colspan=6>"
call fpage("act",page)
response.write "</td></tr>"
response.write "</table>"
end if
'call fpage("id")
rs.close
set rs=nothing
end sub
set conn=nothing

Function fpage(str,page) '分布函数
s=Split(str,"|")
s2=""
For i=0 To UBound(s)
  s2=s2&"&"&s(i)&"="&request(s(i))
next
response.write "<table width=""100%"" cellpadding=0 cellspacing=0 border=0>"


response.write " <tr>"
response.write " <td align=""center"" width=""95%"">&nbsp;&nbsp;信息总数:"&rs.recordcount&"个 页次:"&page&"/"&rs.pagecount&"页"
If page<=1 Then
  response.write " 首&nbsp;页 上一页 "
Else
  response.write " <a href=""javascript:;"" onclick=""javascript:fpage('?page=1"&s2&"')""><font color='#ff0000'>首&nbsp;页</font></a> <a href=""javascript:;"" onclick=""javascript:fpage('?page="&(page-1)&s2&"')""><font color='#ff0000'>上一页</font></a> "
End If
If page>=rs.pagecount Then
  response.write "下一页 尾&nbsp;页 "
Else
  response.write "<a href=""javascript:;"" onclick=""javascript:fpage('?page="&(page+1)&s2&"')""><font color='#ff0000'>下一页</font></a> <a href=""javascript:;"" onclick=""javascript:fpage('?page="&rs.pagecount&s2&"')""><font color='#ff0000'>尾&nbsp;页</font></a>"
End If
response.write "</td> "
response.write " <td width=""5%""></td>"
response.write " </tr>"
response.write "</table>"
End function

'与javascript中的escape()等效
    Function VbsEscape(str)
        dim i,s,c,a 
        s="" 
        For i=1 to Len(str) 
            c=Mid(str,i,1)
            a=ASCW(c)
            If (a>=48 and a<=57) or (a>=65 and a<=90) or (a>=97 and a<=122) Then
                s = s & c
            ElseIf InStr("@*_+-./",c)>0 Then
                s = s & c
            ElseIf a>0 and a<16 Then
                s = s & "%0" & Hex(a)
            ElseIf a>=16 and a<256 Then
                s = s & "%" & Hex(a)
            Else
                s = s & "%u" & Hex(a)
            End If
        Next
        VbsEscape=s
    End Function
    '与javascript中的unescape()等效
    Function VbsUnEscape(str)
                    Dim x
        x=InStr(str,"%") 
        Do While x>0


            VbsUnEscape=VbsUnEscape&Mid(str,1,x-1)
            If LCase(Mid(str,x+1,1))="u" Then
                VbsUnEscape=VbsUnEscape&ChrW(CLng("&H"&Mid(str,x+2,4)))
                str=Mid(str,x+6)
            Else
                VbsUnEscape=VbsUnEscape&Chr(CLng("&H"&Mid(str,x+1,2)))
                str=Mid(str,x+3)
            End If
            x=InStr(str,"%")
        Loop
        VbsUnEscape=VbsUnEscape&str
    End Function
%>


modify_ajax_yc.js
// JavaScript Document
/*
 功能:jquery无刷新修改商品的数量和价格
 来自:www.aspbc.com(asp编程网)
 作者:wangsdong
 原创文件,请保留此信息
*/
/*
id为要修改的记录ID
v是当前默认值
tablename表名
fname为字段名
gname为id的字段名
*/
function forder2(id,v,tablename,fname,gname,str5)
{
str='<input type="text" size="5" value="'+id+'">';

str2='<input id="kk'+id+'"style="text-align:center" type="text" size="5" value="'+v+'" onblur="fchangeorder1('+id+',this.value,\''+v+'\',\''+tablename+'\',\''+fname+'\',\''+gname+'\',\''+str5+'\');">';
//alert(str2);
$("#"+str5+id).html(str2);
$("#kk"+id).focus();
$("#kk"+id).select();
}
/*
id为记录ID
v1为默认值
v为修改后的值
fname为字段名
gname为ID字段名,自动编号的那个字段的字段名
str5为页面上那个span的ID
*/
function fchangeorder1(id,v,v1,t1,fname,gname,str5)
{
 $.post("modify_ajax.asp",{id:id,v:v,t1:t1,fname:fname,gname:gname},
 function(data){
if(data==1)
{
str='<input type="text" size="5" value="'+v+'" maxlength="20"  style="border:1px solid #FFFFFF; ime-mode:Disabled; color:#800000; font-weight:bold; background-color:#FFFFFF; cursor:hand; text-align:center;" onClick="forder2(\''+id+'\',\''+v+'\',\''+t1+'\',\''+fname+'\',\''+gname+'\',\''+str5+'\');">'
$("#"+str5+id).html(str);
}
else
{
$("#"+str5+id).html(v1);
}
 }   
 );  
}

2_upload.asp
<HTML>
<BODY BGCOLOR="#666666">
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="3_upload_update.asp">
<input type="hidden" name="czz" value="<%=Request("czz")%>">  
<INPUT TYPE="FILE" SIZE="20" NAME="FILE1"style="margin-left:-160px!mportant;margin-left:-162px;"> <INPUT TYPE=SUBMIT VALUE="保存Lofar图(1)">
</FORM>
</BODY>
</HTML>


[解决办法]
你是一次更新fname和图片还是一次只更新一个?

还是一次更新一个吧。。要不要修改的太多。

modify_ajax_yc.js,不要修改,还是保存原来的格式就行

// JavaScript Document
/*
 功能:jquery无刷新修改商品的数量和价格
 来自:www.aspbc.com(asp编程网)


 作者:wangsdong
 原创文件,请保留此信息
*/
/*
id为要修改的记录ID
v是当前默认值
tablename表名
fname为字段名
gname为id的字段名
*/
function forder2(id,v,tablename,fname,gname,str5)
{
    str='<input type="text" size="5" value="'+id+'">';
     
    str2='<input id="kk'+id+'"style="text-align:center" type="text" size="5" value="'+v+'" onblur="fchangeorder1('+id+',this.value,\''+v+'\',\''+tablename+'\',\''+fname+'\',\''+gname+'\',\''+str5+'\');">';
    //alert(str2);
    $("#"+str5+id).html(str2);       
    $("#kk"+id).focus();
    $("#kk"+id).select();
}
/*
id为记录ID
v1为默认值
v为修改后的值
fname为字段名
gname为ID字段名,自动编号的那个字段的字段名
str5为页面上那个span的ID
*/
function fchangeorder1(id,v,v1,t1,fname,gname,str5)
{   
     $.post("modify_ajax.asp",{id:id,v:v,t1:t1,fname:fname,gname:gname},
         function(data){
            if(data==1)
            {               
                str='<input type="text" size="5" value="'+v+'" maxlength="20"  style="border:1px solid #FFFFFF; ime-mode:Disabled; color:#800000; font-weight:bold; background-color:#FFFFFF; cursor:hand; text-align:center;" onClick="forder2(\''+id+'\',\''+v+'\',\''+t1+'\',\''+fname+'\',\''+gname+'\',\''+str5+'\');">'
                $("#"+str5+id).html(str);
            }
            else
            {
                $("#"+str5+id).html(v1);
            }           
         }   
     );  
}




'==一次修改一个字段img不需要了
sql="update "&t1&" set "&fname&" = '"&v&"' where object_id ="&id
 

HTML结构改成3#的就应该没问题了
 '******************下面是你要显示的******************'
    if i mod 2= 0 then
      bgcolor="#eeeeee"
    else
      bgcolor="#ffffff"
    end if
    response.write ("<table width='900' border='0'><tr><td bgcolor='#999999'><table width='78' cellpadding='1' cellspacing='1' bordercolor='#000000' bgcolor='#666666'><tr><td width='70' bgcolor='#00FF33'><div align='center'>批号</div></td></tr><tr><td bgcolor='#00FF33' width='70'><p align='center'><span id=""gname300"&object_id&""" name=""gname300"&object_id&"""><input tqitae=""text""  size=""5"" value="&ph&" maxlength=""20""  style=""border:1px solid #FFFFFF; text-align:center; ime-mode:Disabled; color:#800000; font-weight:bold;text-align:center; padding-left:4px; padding-right:4px; padding-top:1px; padding-bottom:1px; background-color:#FFFFFF; cursor:hand;"" onClick=""forder1('"&object_id&"','"&ph&"','shuisheng','ph','object_id','gname300');""></span></p></td></tr></table></td><td><iframe src=""2_upload.asp?czz=imagee

"&object_id&""" width=""550"" height=""50"" frameborder=0 scrolling=no></iframe><span id=""gname500"&object_id&""" name=""gname500"&object_id&"""><input tpye=""text""  id=""imagee"&object_id&"""  size=""5"" value="&imagee&" maxlength=""20""  style=""border:1px solid #FFFFFF; text-align:center; ime-mode:Disabled; color:#800000;  font-weight:bold; padding-left:4px; padding-right:4px; padding-top:1px; padding-bottom:1px; background-color:#FFFFFF; cursor:hand;"" onClick=""forder2('"&object_id&"','"&imagee&"','shuisheng','imagee','object_id','gname500');""></span></td><td width='70' bgcolor='#999999'><table width='3' cellpadding='1' cellspacing='1' bordercolor='#000000' bgcolor='#666666'></table></td></tr></table>")

热点排行