Mij probleem is alsvolgt :
ik heb een SQL database met de tabellen
Medewerkers:
*mednr : numeric
naam : varchar
afdnr : numeric
indienst : varchar
uitdienst : varchar
koppeltabel :
*relatieID
mednr
prognr
En dan nog een paar maar die zijn niet van belang. De tabellen kunnen niet worden gewijzigd omdat een aantal progs deze database gebruiken.
Nou maak ik een asp pagina die deze 2 tabellen moet vullen. De gegevens worden in een form ingevuld op pagina 1 en pagina 2 moet de gegevens in de database wegschrijven. Pagina 1 doet het perfect, maar pagina 2 niet (source hieronder)
<HTML>
<BODY>
<div align='center'>
<%
Dim oConn, oRS, Naam, Afdnr, Indienst, Uitdienst, RelID, Mednr, sql, sql1
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRS = Server.CreateObject("ADODB.Recordset")
oConn.ConnectionString = "DSN=Account;UID=sa"
oConn.Open
Naam = Request.Form("Naam")
Afdnr = Request.Form("Afdnr")
Indienst = Request.Form("Indienst")
Uitdienst = Request.Form("Uitdienst")
RelID = Request.Form("RelID")
Mednr = Request.Form("Mednr")
sql ="INSERT INTO koppeltabel (relatieID,mednr) VALUES "
sql =sql & "('" & RelID & "','" & Mednr & "')"
sql1 ="INSERT INTO Medewerkers (mednr,naam,afdnr,indienst,uitdienst) VALUES"
sql1 =sql1 & "('CAST(1,numeric)','Jaapie','CAST(1,numeric)','10-10-2002','20-12-2002')"
'sql1 =sql1 & "('CONVERT(numeric,1)','Jaapie','CONVERT(numeric,1)','10-10 2002','20-12-2002')"
'sql1 =sql1 & "('CONVERT(numeric," & Mednr & ")','" & Naam & "','CONVERT(numeric," & Afdnr & ")','" & Indienst & "','" & Uitdienst & "')"
'sql1 =sql1 & "('" & Mednr & "','" & Naam & "','" & Afdnr & "','" & Indienst & "','" & Uitdienst & "')"
oConn.Execute sql1,recordsaffected 'regel 29
oConn.Execute sql,recordsaffected
if err <> 0 then
Response.Write("Er is een fout opgetreden")
else
Response.Write(" " & Recordsaffected & " record toegevoegd")
end if
oConn.Close
%>
</div>
</BODY>
</HTML>
De fout melding die ik krijg is : ]Error converting data type varchar to numeric.
/Newmed/Persadmin_rectoevoegen.asp, line 29
Ik heb bij op google, w3schools, microsoft en hier gekeken. Ik vanalles geprobeert maar ik krijg het er niet uit. Weet iemand de oplossing ???
Alvast bedankt!!
ik heb een SQL database met de tabellen
Medewerkers:
*mednr : numeric
naam : varchar
afdnr : numeric
indienst : varchar
uitdienst : varchar
koppeltabel :
*relatieID
mednr
prognr
En dan nog een paar maar die zijn niet van belang. De tabellen kunnen niet worden gewijzigd omdat een aantal progs deze database gebruiken.
Nou maak ik een asp pagina die deze 2 tabellen moet vullen. De gegevens worden in een form ingevuld op pagina 1 en pagina 2 moet de gegevens in de database wegschrijven. Pagina 1 doet het perfect, maar pagina 2 niet (source hieronder)
<HTML>
<BODY>
<div align='center'>
<%
Dim oConn, oRS, Naam, Afdnr, Indienst, Uitdienst, RelID, Mednr, sql, sql1
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRS = Server.CreateObject("ADODB.Recordset")
oConn.ConnectionString = "DSN=Account;UID=sa"
oConn.Open
Naam = Request.Form("Naam")
Afdnr = Request.Form("Afdnr")
Indienst = Request.Form("Indienst")
Uitdienst = Request.Form("Uitdienst")
RelID = Request.Form("RelID")
Mednr = Request.Form("Mednr")
sql ="INSERT INTO koppeltabel (relatieID,mednr) VALUES "
sql =sql & "('" & RelID & "','" & Mednr & "')"
sql1 ="INSERT INTO Medewerkers (mednr,naam,afdnr,indienst,uitdienst) VALUES"
sql1 =sql1 & "('CAST(1,numeric)','Jaapie','CAST(1,numeric)','10-10-2002','20-12-2002')"
'sql1 =sql1 & "('CONVERT(numeric,1)','Jaapie','CONVERT(numeric,1)','10-10 2002','20-12-2002')"
'sql1 =sql1 & "('CONVERT(numeric," & Mednr & ")','" & Naam & "','CONVERT(numeric," & Afdnr & ")','" & Indienst & "','" & Uitdienst & "')"
'sql1 =sql1 & "('" & Mednr & "','" & Naam & "','" & Afdnr & "','" & Indienst & "','" & Uitdienst & "')"
oConn.Execute sql1,recordsaffected 'regel 29
oConn.Execute sql,recordsaffected
if err <> 0 then
Response.Write("Er is een fout opgetreden")
else
Response.Write(" " & Recordsaffected & " record toegevoegd")
end if
oConn.Close
%>
</div>
</BODY>
</HTML>
De fout melding die ik krijg is : ]Error converting data type varchar to numeric.
/Newmed/Persadmin_rectoevoegen.asp, line 29
Ik heb bij op google, w3schools, microsoft en hier gekeken. Ik vanalles geprobeert maar ik krijg het er niet uit. Weet iemand de oplossing ???
Alvast bedankt!!