Pozz kolege
rs2.Open "SELECT Datum,vreme,crtaj,potrosnja,merac,linija FROM Dijagram WHERE Crtaj= '1' ORDER BY datum,vreme;", FrmLogin.Konekcija, adOpenDynamic, adLockOptimistic
ReDim matrica(1 To rs2.RecordCount, 1 To 6)
For X = 1 To rs2.RecordCount
matrica(X, 1) = rs2.Fields("Datum").Value & " " & rs2.Fields("Vreme").Value
matrica(X, rs2.Fields("Linija").Value) = rs2.Fields("Potrosnja").Value
rs2.MoveNext
Next X
Graf.ChartType = VtChChartType2dLine
Graf.ChartData = matrica
to je kod koji bi trebalo da izbaci potrosnju u zavisnosti od vremena. Kod se deburguje bez problema, uspesno podeli y osu i x osu , ali nema nigde linija...ne znam u cemu je problem Gubim živce već 2 dana, stvarno nemam više ideja.
Hvala unapred na svakoj pomoći ;-)
|