---

Hallo,

ich habe keine Information gefunden, wie ich in VisualLisp per ADO/ActiveX den Inhalt einer bestimmten Zeile der verbundenen Datenbank (Excel-Datei) ermitteln kann. Bisher hat es per Asilisp so funktioniert:
( defun asi_selektion_pos_ausfuehren ( lidbefehl iposition
                                      /
                                      cnamecursor
      icursornr
      lergebnis lergtmp lidcursor
      sergtmp )

; Den Namen für den Cursor ermitteln
  (setq icursornr (atoi (rtos (nth 1 lidbefehl))))
  (setq icursornr (1+ icursornr))
  (setq cnamecursor (strcat "cursor" (itoa icursornr)))
  (setq cnamecursor (strcase cnamecursor))

; Die Ergebnisliste erstellen
  (setq lergebnis nil)
  (setq lidcursor (asi_alloc lidbefehl cnamecursor "SCROLL"))
  (asi_open lidcursor)
  (setq lergtmp (asi_fetch lidcursor "ABSOLUTE" iposition))
  (setq sergtmp (type lergtmp))
  (if (= sergtmp 'LIST)
    (setq lergebnis (append lergebnis lergtmp))
    (setq lergebnis (append lergebnis (list lergtmp))) ; else
  ) ; if
  (asi_close lidcursor)
  (asi_deallocstm lidbefehl)
       
; Rückgabewert
  lergebnis

) ; Modulende 

Wie muss ich das per ADO/ActiveX machen?

Gruß Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP