辰东,盗墓笔记有声小说

主頁(yè) > 知識(shí)庫(kù) > asp取動(dòng)態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示

asp取動(dòng)態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示

html>
head>
title>無(wú)標(biāo)題文檔/title>
meta http-equiv="Content-Type" content="text/html; charset=gb2312">
script language="javascript">
var curRow=null;
var y=1;

function selectRow(){
var e=window.event;
var tr1=e.srcElement;
if(curRow)
curRow.bgColor="#FFFFFF";
tr1.bgColor="e7e7e7";
curRow=tr1;
}
function addRow(src){
//alert(src);
var newrow = src.insertRow(src.rows.length-1);
newrow.attachEvent("onclick",selectRow);
newrow.height=20;
var i=4;

while(i--){
var newcell = newrow.insertCell();

switch(i){
case 0: newcell.innerHTML= 'input type="button" onClick="javascript:delRow(this.parentElement.parentElement)" value="刪除此行">'+(y++);
document.all.count.value=y-1;
break;
case 1:newcell.innerHTML=div2.innerHTML;break;
case 2:newcell.innerHTML=div3.innerHTML;break;
case 3:newcell.innerHTML=div4.innerHTML;break;
default: newcell.innerHTML=div1.innerHTML;break;

}
}
//alert(newrow.outerHTML);
}

function delRow(src){

var tab=src.parentElement;
var i=tab.rows.length;
var j=tab.rows.length;
while(i--){
if(src==tab.rows[i]){
//alert("就是這行----"+ i);
document.all.count.value=j-3;
tab.deleteRow(i);

}

}
}
/script>
/head>

body>
form name="form1" action="2.asp" method="post" onsubmit=return(checkv())>
h3>請(qǐng)輸入經(jīng)銷商的通訊信息：/h3>
姓　　名: input type="text"  name="jxname">br>
地　　址: input type="text"  name="jxadd">br>
電　　話: input type="text"  name="jxtel">br>
請(qǐng)輸入庫(kù)存信息br>
table id="tb" width="100%"  border="1" align="center" cellpadding="1" cellspacing="1" style="border-collapse:collapse" bordercolor="#111111">
  tr>
    th scope="col" width="25%">品名/th>
    th scope="col" width="25%">規(guī)格/th>
    th scope="col" width="25%">庫(kù)存量/th>
    th scope="col" width="25%">操作/th>
  /tr>
  tr id="blankRow" onClick="addRow(this.parentElement)">
    td>nbsp;/td>
    td>nbsp;/td>
    td>nbsp;/td>
    td>nbsp;/td>
  /tr>
/table>
input type="hidden" name="count" value="count">
input type="submit" id="btnSub" name="btnSub" value="提交">br>
/form>
div id="div1" style="display:none ">input id="txt" type="text" name="id" style="width:97%; background-color:#FFFFEF">/div>

div id="div2" style="display:none ">input id="txt" type="text" name="id1" style="width:97%; background-color:#FFFFEF" value="11">/div>
/body>
div id="div3" style="display:none ">select  name="id2" style="width:97%; background-color:#FFFFEF" >
option value="箱">箱/option>
option value="件">件/option>

        /select>/div>
div id="div4" style="display:none ">input id="txt" type="text" name="id3" style="width:97%; background-color:#FFFFEF" value="33">/div>
script language="javascript">
function checkv()
{

if (form1.jxname.value.length == 0)
   {
    alert("請(qǐng)?zhí)顚懶彰偷刂罚?);
    form1.jxname.focus();
return false;
      }

else if(!(check_number(form1.id1.value)))
  {
   alert("數(shù)量只能為數(shù)字")
form1.id1.focus();
return false;
}
else
return (true);
}
function check_number(myint)
{

  var checkOK = "0123456789";
  var checkStr = myint;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i  checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j  checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    allNum += ch;
  }
  if (!allValid)
  {
    return (false);
  }
return (true);
}

/script>
/html>

2.   2.asp文件

%
'////////////////////取表單數(shù)據(jù)
response.write("共"+request.form("count")+"記錄")
i=request.form("count")
jxname=request.form("jxname")
jxadd=request.form("jxadd")
jxtel=request.form("jxtel")
response.write(request.form("jxname"))
response.write("br>")
response.write(request.form("jxadd"))
response.write("br>")
response.write(request.form("jxtel"))
response.write("br>")
str1=trim(request.form("id1"))
str2=trim(request.form("id2"))
str3=trim(request.form("id3"))
arrayA=Split(str1,",")
arrayb=Split(str2,",")
arrayc=Split(str3,",")

For i = 0 to UBound(arrayA)
   Response.Write "LI>"  arrayc(i)"--"arrayb(i)"--"arrayA(i)
Next
'///////////////////寫入xml文件
Dim objDom
Dim objRoot
Dim objChild1
Dim objChild2
Dim objChild3
dim objChild4
Dim objPI
Dim PINode
Set objDom = Server.CreateObject("Microsoft.XMLDOM")
'/////寫入樣式
Set PINode=objDom.CreateProcessingInstruction("xml-stylesheet", "type='text/xsl'

href='list.xsl'")
objDom.appendchild PINode
'/////創(chuàng)建根接點(diǎn)
Set objRoot = objDom.createElement("kucunbiao")

objDom.appendChild objRoot
Set objChild1 = objDom.createElement("jxname")
objChild1.text=jxname

objRoot.appendChild objChild1

Set objChild2 = objDom.createElement("jxadd")
objchild2.text=jxadd

objRoot.appendChild objChild2
set objChild3=objDom.createElement("jxtel")
objChild3.text=jxtel
objRoot.appendChild objChild3
set objChild4=objDom.createElement("kucun")
objRoot.appendChild objChild4
For i = 0 to UBound(arrayA)
Set objField = objDom.createElement("field")

'創(chuàng)建屬性taborder。
Set objattTabOrder = objDom.createAttribute("taborder")

'設(shè)定taborder的屬性值
objattTabOrder.Text = i

'把taborder的屬性值追加到field元素中去。
objField.setAttributeNode objattTabOrder

'創(chuàng)建一個(gè)新的元素field_value.
Set objFieldValue2= objDom.createElement("name")
objFieldValue2.Text = arrayc(i)
Set objFieldValue = objDom.createElement("guige")

objFieldValue.Text = arrayb(i)
set objFieldValue1=objDom.createElement("shuliang")
objFieldValue1.Text = arrayA(i)
'追加field元素為根元素的子元素。
objChild4.appendChild objField

'追加field_value做為子元素的內(nèi)容
objField.appendChild objFieldValue
objField.appendChild objFieldValue1
objField.appendChild objFieldValue2
next
Set objPI = objDom.createProcessingInstruction("xml","version='1.0'")

objDom.insertBefore objPI, objDom.childNodes(0)

objDom.Save "f:\xml\"jxname".xml"
'//////////釋放資源
Set objDom = Nothing
Set objRoot = Nothing
Set objField = Nothing
Set objFieldValue = Nothing
Set objattID = Nothing
Set objattTabOrder = Nothing
Set objPI = Nothing
Set PINode=Nothing
%>
3.  用xsl顯示提交的xml，list.xsl

?xml version="1.0" encoding="gb2312" ?>
xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">

xsl:template match="/">
html>
body style="background:#DFEEBB">left>
h3>姓名：xsl:value-of select="kucunbiao/jxname"/>/h3>
h3>地址：xsl:value-of select="kucunbiao/jxadd"/>/h3>

h3>電話：xsl:value-of select="kucunbiao/jxtel"/>/h3>
table border="1" width="600">

     xsl:apply-templates select="kucunbiao/kucun" >

      /xsl:apply-templates>

   /table>/left>
  /body>
  /html>
/xsl:template>
xsl:template match="kucun">

  tr>
    td width="60%">div align="center">名稱/div>/td>
    td width="20%">div align="center">規(guī)格/div>/td>
    td width="20%">div align="center">數(shù)量/div>/td>
    /tr>
xsl:for-each select="field">
  tr>
td>xsl:value-of select="name"/>/td>
td>xsl:value-of select="guige"/>/td>
td>xsl:value-of select="shuliang"/>/td>
/tr>
   /xsl:for-each>

  /xsl:template>

/xsl:stylesheet>

標(biāo)簽：赤峰邢臺(tái) 涼山楚雄南京通遼清遠(yuǎn) 上海

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《asp取動(dòng)態(tài)表單中數(shù)據(jù)并寫入xml文件,用xsl顯示》，本文關(guān)鍵詞 asp,取,動(dòng)態(tài),表單,中,數(shù)據(jù),；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。