vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2021
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: VB6-String an externes Programm per COM übergeben 
Autor: MisterCP
Datum: 06.01.21 22:23

Hallo effeff,

ich habe von dem Programm nur eine Beschreibung in Form einer Hilfedatei. Nach dieser Hilfe hatte ich damals das VB6-Programm geschrieben und das alte Programm funktioniert auch nach wie vor unter Win10.

in der Doku steht:
[id(8), propput] void sExp(long hExp, long nExp, long* nErr, BSTR lpszNewValue);
[id(10), propput] void sExpLgu(long hExp, long nExp, long nLgu, long* nErr, _
  BSTR lpszNewValue);
bzw. (für VB6!)
Private Sub TestButton_Click()
    Dim Export As Object
    Set Export = CreateObject("AisAnl.ExpCom")
 
    Dim hExp As Long
    hExp = Export.hExp("SysParAna")
 
    If hExp > 0 Then
        Dim sExp As String
        Dim nErr As Long
 
        'Erste Zeile Exporttext lesen
        sExp = Export.sExp(hExp, 1, nErr)
        Debug.Print "1. Exportwert: ", sExp
        'Ausgabe: 1. Exportwert: Maximale Schubzeit   [min]
 
        If nErr = 0 Then
            'Erste Zeile Exporttext schreiben
            Export.sExp(hExp, 1, nErr) = "Neue Bezeichnung"
            Debug.Print "1. Exportwert: ", Export.sExp(hExp, 1, nErr)
nach Anpassung der früheren Long-Variablen durch Int32 funktioniert es bis einschließlich Lesen.
nur das Schreiben eben nicht mehr.

aber auch
Dim pTxt As System.IntPtr
pTxt = System.Runtime.InteropServices.Marshal.StringToBSTR("zujitfzutf")
AISExport.sExp(49, 2, AisErr) = pTxt
bringt nach wie vor den gleichen Fehler.

Früher unter VB6 konnte ich einfach einen String zurückschreiben und gut, aber VB.Net macht da irgendwas anders.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
VB6-String an externes Programm per COM übergeben199MisterCP06.01.21 09:19
Re: VB6-String an externes Programm per COM übergeben63effeff06.01.21 21:50
Re: VB6-String an externes Programm per COM übergeben61MisterCP06.01.21 22:23
Re: VB6-String an externes Programm per COM übergeben62Manfred X07.01.21 07:22
Re: VB6-String an externes Programm per COM übergeben49MisterCP07.01.21 18:36
Re: VB6-String an externes Programm per COM übergeben48Manfred X08.01.21 07:24
Re: VB6-String an externes Programm per COM übergeben46MisterCP08.01.21 07:36
Re: VB6-String an externes Programm per COM übergeben48Manfred X08.01.21 09:50
Re: VB6-String an externes Programm per COM übergeben17MisterCP13.01.21 18:54

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2021 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel