<％
'変数を宣言します
dimvalName
dimarrname
dimobjconn
DimconnStr
ifrequest.form（ "mySubmit"）= "ok" then
'データベースリンクコード
setobjconn = server.createObject（ "adodb.Connection"）
connstr = "provider = sqloledb; server =（local）; database = test; uid = sa; pwd = 123456;"
objconn.openconnstr
'値を取得します
valname = cstr（request.form（ "myname"））
'データベースを挿入します
arrname = split（valname、 "、"）
arrpassword = split（valpassword、 "、"）
'データベースを挿入するプロセスを実行します
fori = 0toubound（arrname）
「SQLステートメントを自分で変更してください
objconn.execute（ "insertIntomytable（sname）values（ '"＆trim（arrname（i））＆ "'）"）
次
Response.write（ "データ挿入の正常に"）
'データベース接続を閉じます
objconn.close
setobjconn =何もない
endif
％>
<html>
</head>
<body>
<inputtype = "button" value = "1つのデータを追加" onclick = "addit（）"/>
<formmethod = "post" action = "test.asp" id = "myform">
<div> <inputtype = "text" name = "myname"/> </div>
<inputtype = "submit" value = "識別" id = "mySubmit" name = "mySubmit"/>
</form>
</body>
</html>
<scriptlanguage = "javascript" type = "text/javascript">
function $（obj）{
returnDocument.getElementById（OBJ）;
}
functionaddit（）{
varmyform = $（ "myform"）;
varmysubmit = $（ "mysubmit"）;
varmydiv = document.createelement（ "div"）;
varmyinput = document.createelement（ "input"）;
myinput.setattribute（ "type"、 "text"）;
myinput.setattribute（ "name"、 "myname"）;
myform.insertbefore（mydiv、mysubmit）;
mydiv.appendChild（myinput）;
}
</script>