<%
'Объявите переменные
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.openconstr
'Получите значение
valname = cstr (request.form ("myname"))
'Вставьте базу данных
arrname = split (valname, ",")
arrpassword = split (valpassword, ",")
'Выполните процесс вставки базы данных
Fori = 0toubound (arrname)
'Пожалуйста, измените заявление SQL самостоятельно
objconn.execute ("insertintomytable (sname) значения ('" & trim (arrname (i)) & "')")
Следующий
Response.write ("успешно вставка данных")
'Закрыть соединение базы данных
objconn.close
Setobjconn = ничего
Эндиф
%>
<html>
</head>
<тело>
<inputType = "кнопка" value = "добавить один данные" onclick = "addit ()"/>
<formmethod = "post" action = "test.asp" id = "myform">
<div> <inputtype = "text" name = "myname"/> </div>
<inputType = "отправить" value = "идентифицировать" id = "mySubmit" name = "mySubmit"/>
</form>
</body>
</html>
<scriptlanguage = "javascript" type = "text/javascript">
функция $ (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>