I'm having a problem with the following code .
I am getting back a Type Mismatch error (#13).
stumped.
conPool.Execute ("INSERT into employee values" & _
"('" & _
Text1(0).Text & "','" & _
Text1(1).Text & "','" & _
Text1(2).Text & "','" & _
Text1(3).Text & "','" & _
Text1(4).Text & "','" & _
Text1(5).Text & "','" & _
Text1(6).Text & "','" & _
Text1(7).Text & "','" & _
Text1(8).Text & "','" & _
Text1(9).Text & "'," & _
IIf(Text1(10).Text = "", 0, CDbl(Text1(10).Text)) & "," & _
IIf(Text1(11).Text = "", 0, CDbl(Text1(11).Text)) & "," & _
IIf(Text1(12).Text = "", 0, CDbl(Text1(12).Text)) & "," & _
IIf(Text1(13).Text = "", 0, CDbl(Text1(13).Text)) & ",'" & _
jobTitle(0).Text & "','" & _
jobTitle(1).Text & "','" & _
jobTitle(2).Text & "','" & _
Text1(17).Text & "'," & _
IIf(Text1(18).Text = "", 0, CDbl(Text1(18).Text)) & ""
any ideas or help would be appreciated,
-tryp
the imediate ifs are for the fields in the access database that require double values.
I am getting back a Type Mismatch error (#13).
stumped.
conPool.Execute ("INSERT into employee values" & _
"('" & _
Text1(0).Text & "','" & _
Text1(1).Text & "','" & _
Text1(2).Text & "','" & _
Text1(3).Text & "','" & _
Text1(4).Text & "','" & _
Text1(5).Text & "','" & _
Text1(6).Text & "','" & _
Text1(7).Text & "','" & _
Text1(8).Text & "','" & _
Text1(9).Text & "'," & _
IIf(Text1(10).Text = "", 0, CDbl(Text1(10).Text)) & "," & _
IIf(Text1(11).Text = "", 0, CDbl(Text1(11).Text)) & "," & _
IIf(Text1(12).Text = "", 0, CDbl(Text1(12).Text)) & "," & _
IIf(Text1(13).Text = "", 0, CDbl(Text1(13).Text)) & ",'" & _
jobTitle(0).Text & "','" & _
jobTitle(1).Text & "','" & _
jobTitle(2).Text & "','" & _
Text1(17).Text & "'," & _
IIf(Text1(18).Text = "", 0, CDbl(Text1(18).Text)) & ""
any ideas or help would be appreciated,
-tryp
the imediate ifs are for the fields in the access database that require double values.