Witam,
Mam taki skrypt w VBS
Sub KURS
dim kurs
dim doksprzed_id
id = PB.GetArg(0)
kurs = InputBox("Podaj kurs ","Zmiana kursu ","")
err = PB.SQLCommand("exec procedura_sql " &kurs & id)
msgbox("Nowy kurs : " & kurs)
End Sub
Nie wiem dlaczego ale procedura sql się nie wykonuje.
Może jakieś pomysły?
Ok mam to ogarnięte. Brakowało &"," pomiędzy &kurs a &id
err = PB.SQLCommand("exec procedura_sql " &kurs &","& id)
Niestety pojawił się następny problem.
Zmienna kurs jest zwracana jako string i gdy wpiszę do InputBox np.: 4,4444 to dostaję zmienną z przecinkiem.
Powoduje to, że procedura_sql chce wykonać się z 3 zmiennymi a nie z 2 bo wygląda to tak:
exec procedura_sql 4,4444 , id
Ja to ogarnąć?
Problem rozwiązany za pomocą Replace.
kurs = Replace(kurs,",",".")