Set rs = baglan.Execute("DELETE FROM SiparisKayitlari WHERE Siparis_No='" & sipno & "'")
sipno alani metin degil mi?
Silme kodunda tek tirnaktan onceki ve sonraki bosluklari silip oyle dener misiniz?