Ik snap er niets meer van.
Na talloze pogingen en voorbeelden snap ik niet waarom de volgende code niet meer werkt wanneer ik option explicit en de daaropvolgende 2 regels uncomment:
hij blijft me dan steeds gelukt terug geven...
ps. die error=Conn.errors(0).SQLState regel was ik mee aant spelen, dus heb die nu ff commented
Na talloze pogingen en voorbeelden snap ik niet waarom de volgende code niet meer werkt wanneer ik option explicit en de daaropvolgende 2 regels uncomment:
ASP:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| <%@ Language="VBScript" %> <% 'Option Explicit %> <% 'dim err 'Set err = Server.GetLastError() dim connstr,conn on error resume next ConnStr = "Provider=SQLOLEDB;Data Source=foo;Initial Catalog=bar;User Id=sa;Password=foobar" Set conn = Server.CreateObject("ADODB.Connection") conn.open (ConnStr) conn.Execute "insert into test (er) values ('s')" ' error=Conn.errors(0).SQLState conn.close set conn=nothing if err.number<>0 then response.write ("Error # " & CStr(Err.Number) & " " & Err.Description) else response.write "gelukt" end if %> |
hij blijft me dan steeds gelukt terug geven...
ps. die error=Conn.errors(0).SQLState regel was ik mee aant spelen, dus heb die nu ff commented
[ Voor 27% gewijzigd door Vinzzz243 op 06-01-2005 13:27 ]