SsawMedlem sedan mars 20011 880 inlägg Frågan#1 Jag får fel på denna uppdaten. Jag tror att det är checkboxarna som trilskas men jag lyckas inte att fixa det.
Jag kör SQL 2000 server.
SQL = "Update t_Kunder
Set Kundkategori=
(SELECT KundKat_Id FROM t_KundKategori
WHERE KundKategori='" & Combo2.
Text & "'),Firma='" & Text1(0) & "',
Namn ='" & Text1(1) & "',
Box = '" & Text1(2) & "',
Adress = '" & Text1(3) & "',
PostOrt = '" & Text1(4) & "',
Tel = '" & Text1(5) & "',
Mobil = '" & Text1(6) & "',
Fax = '" & Text1(7) & "',
URL = '" & Text1(9) & "',
Epost = '" & Text1(10) & "',
EjLjud = " & Check1.Value & ",
Info = " & Check2.Value & ",
SkickCD = " & Check3.
Value & ",
Anteck = '" & Text1(8) & "'
WHERE kundID = " & strListText & ""
Jag får ett error som säger att det är fel på "="...
LLarsGMedlem sedan dec. 200012 464 inlägg Vilken datatyp använder du för EjLjud ?
Om det är bit så måste värdet vara 1 eller 0
t.ex.
if check1.value <> "" then
ejLjud = 1
else
ejLjud = 0
end if
if check1.value <> "" then
info = 1
else
info = 0
end if
if check1.value <> "" then
skickCD = 1
else
skickCD = 0
end if
SQL = "Update t_Kunder
Set Kundkategori=
(SELECT KundKat_Id FROM t_KundKategori
WHERE KundKategori='" & Combo2.
Text & "'),Firma='" & Text1(0) & "',
Namn ='" & Text1(1) & "',
Box = '" & Text1(2) & "',
Adress = '" & Text1(3) & "',
PostOrt = '" & Text1(4) & "',
Tel = '" & Text1(5) & "',
Mobil = '" & Text1(6) & "',
Fax = '" & Text1(7) & "',
URL = '" & Text1(9) & "',
Epost = '" & Text1(10) & "',
EjLjud = " & ejLjud & ",
Info = " & info & ",
SkickCD = " & skickCD & ",
Anteck = '" & Text1(8) & "'
WHERE kundID = " & strListText & ""
Exakt hur lydde felmeddelandet?
SsawMedlem sedan mars 20011 880 inlägg Tack LarsG, med en smärre förändring så tycks det fungera.
If Check1 = Checked Then
ejLjud = 1
Else
ejLjud = 0
End If
If Check2 = Checked Then
info = 1
Else
info = 0
End If
If Check3 = Checked Then
skickCD = 1
Else
skickCD = 0
End If
Ja datatypen är Bit
Än en gång tack