Re: Хех, может вопрос по ASP+MS SQL подкинуть? :)
От: 4auHuK  
Дата: 07.08.02 06:15
Оценка:
Вот ASP код:

<HTML>

<HEAD>
<%
Set conn = Server.CreateObject("ADODB.Connection")
connString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=inetPubs;Password=inetPubs;Initial Catalog=pubs;Data Source=Flint-San;Connect Timeout=400;Auto Translate=False;Application Name=InetFromOLEDB"

conn.Open connString
%>
<%
SqlString = "CREATE TABLE #T1 ( anyfld int)" & _
" CREATE TABLE #T2 ( anyfld int)" & _
" CREATE TABLE #T3 ( anyfld int)"
conn.CursorLocation = 2
conn.Execute(SqlString)

'Предположим эти три таблицы заполняются одной SP на MS SQL сервере, но для упрощения сделаем так
SqlString = "INSERT #T1 VALUES(100)" & _
" INSERT #T2 VALUES(200)" & _
" INSERT #T3 VALUES(300)"
conn.Execute(SqlString)


Set rs1 = conn.Execute("SELECT * FROM #T1")
Set rs2 = conn.Execute("SELECT * FROM #T2") '<--- тут ошибка выполнения
Set rs3 = conn.Execute("SELECT * FROM #T3") %>

</HEAD>

<BODY>
<%= rs1(0) %> <BR>
<%= rs2(0) %> <BR>
<%= rs3(0) %> <BR>

<% Set rs4 = conn.Execute("SELECT COUNT(*) as cnt FROM #T3") %>
<%= rs4(0) %> <BR>

<%
SqlString = "DROP TABLE #T1" & _
" DROP TABLE #T2" & _
" DROP TABLE #T3"
conn.Execute SqlString


conn.Close
Set conn = Nothing
%>
</BODY>
</HTML>

Вопрос: почему, такой простой код дает ошибку в указаном месте?
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.