Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
emptySA
Зарегистрирован: 22.12.2007 Сообщения: 3
|
Добавлено: Сб Дек 22 2007 02:06 Заголовок сообщения: Добавление данных в базу через ASP через функцию. |
|
|
Вообщем ситуация такая есть файл sub.asp который содержит 2 функции:
Цитата: |
<%
public function connect (login, pass)
const adOpenKeyset=1
const adLockOptimistic=3
set con=Server.CreateObject("ADODB.Connection")
con.Open "Provider=SQLOLEDB; Server=.; Database=curs; UID="&login&"; PWD="&pass&""
set rst=Server.CreateObject("ADODB.Recordset")
end function
function addPP (PP_Name, INN)
rst.Open "select * from PP",con, adOpenKeyset,adLockOptimistic
rst.AddNew
rst("PP_Name")=Request.form("PP_Name")
rst("INN")=Request.form("INN")
rst.Update
rst.close
con.close
%>
|
Есть файл index.asp, который обращается к этому файду и вводит данные:
Цитата: |
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Выберите расширение для паковки" content="text/html; charset=iso-8859-1" />
<title>Документ без имени</title>
</head>
<body>
<script language="vbscript">
<!--#include file="sub.vbs"-->
</script>
<% connect "admin", "admin" %>
<p>
<input type="text" name="PP_Name" value="" onfocus="if(this.value=='Your message')this.value='';" />
<input type="text" name="INN" value="" onfocus="if(this.value=='Your message')this.value='';" />
<input name="" type=submit onclick="addPP(PP_Name, INN)" value="add">
</p>
</body>
</html>
|
Нажимаем add, процедура вроде бы выполняется, но с ошибкой. И данные не добавляются. Если сзбавиться от включенного файла и писать весь код в index.asp, все работает? В чем проблема? Вообще все подпрограммы выполняются со ошибкой, даже если их записахть в индексюапс. Что я делаю не так?[/quote] |
|
Вернуться к началу |
|
|
Mytilus Galloprovincialis
Зарегистрирован: 30.08.2005 Сообщения: 358 Откуда: откуда все люди родятся
|
Добавлено: Пн Дек 24 2007 01:31 Заголовок сообщения: |
|
|
У тебя файл называется sub.asp, а в include - sub.vbs. |
|
Вернуться к началу |
|
|
emptySA
Зарегистрирован: 22.12.2007 Сообщения: 3
|
Добавлено: Пн Дек 24 2007 02:10 Заголовок сообщения: |
|
|
Mytilus Galloprovincialis писал(а): | У тебя файл называется sub.asp, а в include - sub.vbs. |
Этот косяк исправен давно. все равно не работает. |
|
Вернуться к началу |
|
|
Mytilus Galloprovincialis
Зарегистрирован: 30.08.2005 Сообщения: 358 Откуда: откуда все люди родятся
|
Добавлено: Пн Дек 24 2007 17:32 Заголовок сообщения: |
|
|
Хотелось бы, конечно, выяснить текст ошибки... А пока есть один вариант: в твоем случае addPP надо вызывать без скобок - addPP PP_Name, INN. |
|
Вернуться к началу |
|
|
emptySA
Зарегистрирован: 22.12.2007 Сообщения: 3
|
Добавлено: Чт Дек 27 2007 20:19 Заголовок сообщения: |
|
|
в connect уже сам нашел ошибку. Нужно писать call connect *,*
А вызов функции добавления в таком формате не возможен, только через яваскрипт. Думал если цит-форум, то хоть какая то помощ будет... |
|
Вернуться к началу |
|
|
|