Typemixerror in ... free translation

[Bob the ASP Builder]

I use this databaseconnection

Dim SQLINSERT
Dim connupdate
Dim A
Dim I
Dim H
Dim J
Dim K
Dim L
Dim StrConnect

A = Request.Form("A")
K = Request.querystring("K")
K = K + 1
L = 0
I = FormatDateTime(date(),vbgeneraldate)
H = FormatDateTime(time(),vbgeneraldate)

set conn = server.createobject("ADODB.Connection")
strConnect = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&
Server.MapPath("Min.mdb")
Conn.Open StrConnect

SQLINSERT="INSERT INTO Min ( A, K, L, I, H) "
SQLINSERT=SQLINSERT & "VALUES ("
SQLINSERT=SQLINSERT & "'" & A & "', "
SQLINSERT=SQLINSERT & "'" & K & "', "
SQLINSERT=SQLINSERT & "'" & L & "', "
SQLINSERT=SQLINSERT & "'" & I & "', "
SQLINSERT=SQLINSERT & "'" & H & "') "

set connupdate = server.createobject("ADODB.Connection")
connupdate.open StrConnect
connupdate.execute(SQLINSERT)'^^Rad 33
connupdate.close
conn.close

It returns this errormessage:
Typemixingerror in conditonsstatement.^^(Translated from Swedish)^^
/database/updat.asp, line 33

Ive tried to change the setting of field type in the Accesdatabase from
numeric to text and vice versa - but Im sort of stucked - What is it
that Im missing here - do you see it?


Bob the ASP Builder

*** Sent via Developersdex [url]http://www.developersdex.com[/url] ***
Don't just participate in USENET...get rewarded for it!

[Aaron Bertrand - MVP]

> set conn = server.createobject("ADODB.Connection")

> ...
> set connupdate = server.createobject("ADODB.Connection")

Why do you create two connection objects?

> SQLINSERT="INSERT INTO Min ( A, K, L, I, H) "
> SQLINSERT=SQLINSERT & "VALUES ("
> SQLINSERT=SQLINSERT & "'" & A & "', "
> SQLINSERT=SQLINSERT & "'" & K & "', "
> SQLINSERT=SQLINSERT & "'" & L & "', "
> SQLINSERT=SQLINSERT & "'" & I & "', "
> SQLINSERT=SQLINSERT & "'" & H & "') "

I don't think these are all strings? Dates need to be delimited by # for
Access, and numeric columns should not have any delimiters.

--
Aaron Bertrand
SQL Server MVP
[url]http://www.aspfaq.com/[/url]

[Bob Lehmann]

Min is a reserved word so not suitable for a table name.

Bob Lehmann

"Bob the ASP Builder" <anonymous@devdex.com> wrote in message
news:eefah4y2DHA.2528@TK2MSFTNGP10.phx.gbl...

>
> I use this databaseconnection
>
> Dim SQLINSERT
> Dim connupdate
> Dim A
> Dim I
> Dim H
> Dim J
> Dim K
> Dim L
> Dim StrConnect
>
> A = Request.Form("A")
> K = Request.querystring("K")
> K = K + 1
> L = 0
> I = FormatDateTime(date(),vbgeneraldate)
> H = FormatDateTime(time(),vbgeneraldate)
>
> set conn = server.createobject("ADODB.Connection")
> strConnect = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&
> Server.MapPath("Min.mdb")
> Conn.Open StrConnect
>
> SQLINSERT="INSERT INTO Min ( A, K, L, I, H) "
> SQLINSERT=SQLINSERT & "VALUES ("
> SQLINSERT=SQLINSERT & "'" & A & "', "
> SQLINSERT=SQLINSERT & "'" & K & "', "
> SQLINSERT=SQLINSERT & "'" & L & "', "
> SQLINSERT=SQLINSERT & "'" & I & "', "
> SQLINSERT=SQLINSERT & "'" & H & "') "
>
> set connupdate = server.createobject("ADODB.Connection")
> connupdate.open StrConnect
> connupdate.execute(SQLINSERT)'^^Rad 33
> connupdate.close
> conn.close
>
> It returns this errormessage:
> Typemixingerror in conditonsstatement.^^(Translated from Swedish)^^
> /database/updat.asp, line 33
>
> Ive tried to change the setting of field type in the Accesdatabase from
> numeric to text and vice versa - but Im sort of stucked - What is it
> that Im missing here - do you see it?
>
>
> Bob the ASP Builder
>
> *** Sent via Developersdex [url]http://www.developersdex.com[/url] ***
> Don't just participate in USENET...get rewarded for it!

[Bob the ASP Builder]

because i perform 2 operations and would get error Object missing
otherwise

Bob the ASP Builder

*** Sent via Developersdex [url]http://www.developersdex.com[/url] ***
Don't just participate in USENET...get rewarded for it!

[Aaron Bertrand [MVP]]

> because i perform 2 operations and would get error Object missing

> otherwise

Maybe because you inadvertently closed the object after the first operation?
Much better strategy here:

set conn = createObject("ADODB.Connection")
conn.open "<connection string>"
conn.execute "operation1"
conn.execute "operation 2"
conn.close
set conn = nothing

--
Aaron Bertrand
SQL Server MVP
[url]http://www.aspfaq.com/[/url]

[Bob the ASP Builder]

Well - I dont actually use the word Min - but that is the swedish word
for Mine - and the actual problem eventually túrned out to be a faulty
constructed Querystring result from a different script - thanks for your
effort

Bob the ASP Builder

*** Sent via Developersdex [url]http://www.developersdex.com[/url] ***
Don't just participate in USENET...get rewarded for it!

[Bob the ASP Builder]

You're absolutely right - Ive implemented that now - I have just copied
+pasted this bit without really thinking it through - it worked - yours
works better
THANK YOU

Bob the ASP Builder

*** Sent via Developersdex [url]http://www.developersdex.com[/url] ***
Don't just participate in USENET...get rewarded for it!