user: "bbl"
Witam, Jak sprawdzić w ktorej lini bl±d? Wiem że można ponumerować linie w programie i jak zrobić do tego obsługę?
user: "Skylla"
> Jak sprawdzić w ktorej lini bl±d? > Wiem że można ponumerować linie w programie i jak zrobić do tego obsługę? Człowieku, które ¶rodowisko i jaki bł±d?
user: "4n7" <2744424@gg.pl>
> Witam, > > Jak sprawdzić w ktorej lini bl±d? > Wiem że można ponumerować linie w programie i jak zrobić do tego obsługę? > np. w vb6 np. tak: Private Function nz(vText As Variant, Optional sReturnIfNull As String = "") As String ' 100 On Error GoTo err_ ' 110 If IsNull(vText) Then nz = sReturnIfNull: Exit Function 120 Dim sText As String 130 sText = Trim$(vText) 140 If (sText = ",") Then nz = "" Else nz = sText ' 150 Exit Function err_: 160 Err.Source = Err.Source & " " & "edg2xml.frmEDG2XML.nz" 170 Err.Source = Trim$(Err.Source) 180 If Err.Number <> 0 Then 190 MsgBox "Wystąpił błąd nr " & Err.Number & ":" & Err.LastDllError & " linia " & Erl & " w " & Err.Source & vbNewLine & Err.Description, vbCritical 200 End If ' End Function mozna uzyc smart code - tak jak w tym wypadku - sam dopisuje nr lini w procedurze -- 4n7 ps. jak teraz patrze na ten kod to sie smieje wystarczy zamiast funkcji nz() (-ekwiwalent z access'a) uzyc x = "" & rst!record - jak null bedzie to sie nie wyjebie [definicja &] no i jest opcja dla liczb; x = clng("0" & rst!record) pozdr!x