Zum Inhalt springen

matthiasr

Mitglieder
  • Gesamte Inhalte

    174
  • Benutzer seit

  • Letzter Besuch

Alle Inhalte von matthiasr

  1. Hallo, vielleicht umständlich, aber es hat gecklappt. DWORD dwResult = GetAdaptersInfo(pAdapterInfo, &uSize); char *cIP = (char*)&pAdapterInfo->IpAddressList.IpAddress; Wenn ich noch was verbessern könnte dann würde ich mich freuen wenn Ihr mir noch einen Tipp geben könntent. Ansonsten vielen Dank für Eure Hilfe, hoffe das ich auch mal was tun kann für andere. Matthias
  2. Wenn ich die MSDN richtig verstanden habe, castest Du den Pointer, aber wieso von IP_ADAPTER_INFO* in IP_ADAPTER_INFO*, versteh ich nicht ganz. IP_ADAPTER_INFO* pAdapterInfo = reinterpret_cast<IP_ADAPTER_INFO*>(buffer); Oder mach's wie in dem MSDN-Beispiel und reservier den Puffer mit malloc.
  3. Leider hakt es schon wieder. IP_ADAPTER_INFO *pAdapterInfo = 0; ULONG uSize = 10000; DWORD& dwResult = uSize; PULONG pOutBufLen = &uSize; dwResult = GetAdaptersInfo(pAdapterInfo, pOutBufLen); Dies ist mein Code. Nun bekomme ich allerdings immer einen ERROR_BUFFER_OVERFLOW bei der Funktion GetAdaptersInfo. Das ganze sieht vielleicht etwas unbeholfen aus abe soweit würde es ja auch funktionieren. Matthias
  4. [ Du hast anscheinend Iphlpapi.lib nicht hinzu gelinkt. Das kannst du über die Projekteinstellungen oder ein #pragma comment(lib, "Iphlpapi.lib") machen.
  5. Ok, die Fehlermeldungen habe ich weggebracht, aber was hat das verschieben gebracht? Nun habe ich allerdings die Fehlermeldungen Nichtaufgeloestes externes Symbol _GetAdaptersInfo@8 1 unaufgeloeste externe Verweise Wenn ich die Funktion GetAdaptersInfo auskommentiere, dann kommen die Fehlermeldungen nicht mehr? Vielleicht stelle ich mich nur an, aber ich weis mir keinen Rat. Danke Matthias
  6. Hallo, also, ich habe das SDK heruntergeladen und konnte den Header einbinden. Nun habe ich allerdings zwei Fragen. Leider konnte ich das SDK nicht "nur" herunterladen, nein es musste gleich installiert werden. Ich möchte dies natürlich nur einmal machen und möchte wissen was ich sichern muss um beim nächsten Aufsetzten das SDK wieder zu installieren. Zum zweiten habe ich nach dem einbinden einige Fehlermeldunge bekommen die ich mir nicht erkläaren kann. Die Fehlermeldungen treten bei der Funktion GetIcmpStatisticsEx( OUT PMIB_ICMP_EX pStats, IN DWORD dwFamily ); auf, und lauten "error C2065: 'PMIB_ICMP_EX' : nichtdeklarierter Bezeichner" "error C2146: Syntaxfehler : Fehlendes ')' vor Bezeichner 'pStats'" "warning C4229: Anachronismus verwendet : Modifizierer der Daten werden ignoriert" "error C2059: Syntaxfehler : ')'" Diese Fehlermeldungen treten alle in der iphlpape.h auf, diese habe ich ja aber von Microsoft heruntergeladen??? Ich werde die Funktion fürs erste auskommentieren, aber das ist auch keine Lösung. Matthias
  7. Hallo, ich möchte mit VS6.0 und ner einfachen Konsonlenanwendung die IP-Adresse auslesen. Nun bin ich schon auf GetAdaptersInfo gestoßen und wollte die dazugehörigen Files einbinden Header: Declared in Iphlpapi.h Library: Use Iphlpapi.lib Leider finde ich diese aber weder auf meinen CD's noch auf meinem Rechener. Wie kann ich diese Funktion verfügbar machen? Danke
  8. Hallo, ich habe einfach ActiveSheet eingesetzt und schon läuft es, ich hoffe das ich damit nicht irgendwas völlig falsch obwohl es geht. oExl.ActiveSheet.Cells(1, 1).Value = "Test" Danke für die Hilfe Matthias
  9. Heute Abend komme ich zum Testen und teile Dir mein Ergebniss mit.
  10. Ich habs auch schon so probiert Quellcode: Private Sheet1 As Object Private Sub Command1_Click() Dim oExcel As Object Set oExcel = CreateObject("excel.Application") 'appl. öffnen Set Sheet1=oExcel.Workbooks.Open("C:\test1.xls") Sheet1.Cells(1, 1) = "Hallo" End Sub mit dem selben Ergebnis. Ich denke das sollte auch Deinen Vorschlag erfüllen, wenn ich mich nicht täusche. Dennoch ein guter Grundsätzlicher Tipp. Matthias
  11. Quellcode: Private Sheet1 As Object Private Sub Command1_Click() Dim oExcel As Object Set oExcel = CreateObject("excel.Application") 'appl. öffnen Set Sheet1=oExcel.Workbooks.Open("C:\test1.xls") End Sub Private Sub Command3_Click() Sheet1.Cells(1, 1) = "Hallo" End Sub
  12. Sorry, ja, dennoch bekomme ich die Fehlermeldung
  13. Hallo, mittels VB6 versuche ich Daten aus einer Excel Datei zu lesen, das öffnen und kopieren der Datei klappt, was nicht klappt ist das lesen. Bei der Zeile Sheet1.Cells(1, 1) = "Hallo" bekomme ich die Fehlermeldung "Objekt unterstützt diese Eigenschaft oder Methode nicht" woran kann das liegen? Matthias
  14. Hallo, ich arbeiten mit VS 6 und möchte gerne eine Internet-Seite aufrufen und sie mir im Quellcode anzeigen lassen damit ich diese abspeichern kann. Mit ShellExecute(NULL, "open", "C:\\programme\\Internet Explorer\\IEXPLORE.EXE", "www.bmw.de", NULL, SW_SHOWMAXIMIZED); kann ich eine bestimmte Seite aufrufen. Nun stoße ich aber auch auf ein Login, kann ich den Benutzer und das Kennwort vorgeben und dann auch noch die darauffolgende Seite im Quellcode anzeigen lassen, per Hand über Ansicht -> Quelltext. Vorab bereits vielen Dank
  15. matthiasr

    ListBox.AddItem

    Wie ich doch schrieb, die ListBox aus Access.
  16. matthiasr

    ListBox.AddItem

    Hallo, also, Access XP und ene normale ListBox wie man Sie mit der Toolbox einbauen kann. Dies ListBox hat drei Spalten, mit ListBox.AddItem Item "Erste; Zweite; Dritte" kann ich in allen Spalten was schreiben. Will ich aber statt der festen Texte Variablen als Paramerter übergeben, klappt das ganze nicht mehr, ich kann dann nur mehr in die erste Spalte meine Werte übertragen. Ich brauche also die Richtige Syntax um die ListBox mit Variablen zu füllen, darum geht es. Gruß Matthias
  17. matthiasr

    ListBox.AddItem

    Damit kann ich aber nur eine Spalte von drei füllen. Ich arbeite in Access mit ner ListBox und habe drei Spalten, ich kann, durch Semikolon getrennt, alle drei Spalten füllen, allerdings nur feste Texte, keine Variablen. Vieleicht hilft Dir das weiter.
  18. matthiasr

    ListBox.AddItem

    Ja, es ist die Std-Version einer ListBox. Hast Du nee Lösung für mein Problem?
  19. matthiasr

    ListBox.AddItem

    Hallo, also ich versuche in VBA ein ListBox zu füllen, welche drei Spalten hat. Leider kann ich nichts in die zweite und dritte Spalte schreiben. In der Hilfe fand ich was das ich es mit dem Tabb-Zeichen trennen sollte, aber half nichts. Ich kann zwar einen festen Text schereiben mit ListBox.AddItem Item:="Erste;Zweite;Dritte" aber Variablen kann ich nicht zuweisen? Vielen Dank für die Hilfe
  20. Hallo, also ich versuche in VBA ein ListBox zu füllen, diese hat drei Spalten. Leider kann ich nichts in die zweite und dritte Spalte schreiben. In der Hilfe fand ich was das ich es mit dem Tabb-Zeichen trennen sollte, aber half nichts. Vielen Dank für die Hilfe
  21. matthiasr

    SQL Abfrage

    So geht's. strSQL = "SELECT * FROM tblHoerspiele WHERE Titel LIKE 'C*';" Danke
  22. matthiasr

    SQL Abfrage

    Du meinst so strSQL = "SELECT * FROM tblHoerspiele " & "WHERE Titel LIKE " & _ "'" & "C%" & "';" leider habe ich auch hier keinen Erfolg?
  23. matthiasr

    SQL Abfrage

    Hallo, erstmal danke für den Tip, allerdings bin ich mit diesen Zeilen strSQL = "SELECT * FROM tblHoerspiele " & "WHERE Titel = " & _ "'" & "C%" & "';" nicht weitergekommen. Wenn ich statt C% den Namen eines Titels eingebe findet es diesen? Habe es mit C* auch probiert, aber ohne Erfolg??
  24. matthiasr

    SQL Abfrage

    Stimmt! Möchte gleich noch eine Frage loswerden. In meinen Suchfenster möchte ich alle Titel die mit "r" beginnen heraus filtern. Dies sollte doch mit "r*" möglich sein, oder
  25. Hallo, also ich hab eine Tabelle in Access und versuche über VBA eine SQL Abfrage aus zu führen. Set rec = CurrentDb.OpenRecordset("SELECT * FROM tblHoerspiele" & _ "WHERE Titel = 'Der Herr der Ringe 04.mp3';", dbOpenSnapshot) Dies ist see. So, nun bekommen ich immer die Fehlermeldung "Syntaxfehler in FROM-Klausel. Wenn ich allerdings den WHERE-Teil weglasse, dann ist alles OK. Wo liegt mein Fehler? Matthias

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...