Suchergebnisse

Suchergebnisse 1-21 von insgesamt 21.

  • Benutzer-Avatarbild

    Hat sich erledigt! Der SmallBusinessServer hat standardmässig outgoing FTP in der Firewall blockiert

  • Benutzer-Avatarbild

    Hallo zusammen, weiß jemand, warum dieser Code, der auf einem Server 2003 (x32) problemlos lief, nun auf einem Small Business Server 2011 (x64) nicht mehr funktioniert? Visual Basic-Quellcode (55 Zeilen) Merkwürdigerweise scheint das Login zu klappen, denn die Datei ist auf dem FTP-Server hinterher auch präsent. Allerdings mit 0 Byte Größe :-( Hat jemand eine Idee? Die MSINET.OCX ist natürlich registriert ... Danke im Voraus, Sarek \\//_

  • Benutzer-Avatarbild

    Hallo zusammen, ich verwende in einem Programm folgende Funktion: Quellcode (19 Zeilen) Klappte unter Windows XP hervorragend, aber wenn ich das unter Windows 7 (x64) laufen lasse, bekomme ich folgende Meldung: Run-time error '-2147217407 (80041001)' Automation Error

  • Benutzer-Avatarbild

    Zitat von petaod: „Gibt es besondere Gründe für VB6?“ Die gleichen wie beim letzten Mal, es ist immer noch das gleiche Projekt. Zitat von petaod: „Wenn's schon sein muss: URLDownloadToFile“ Danke ...

  • Benutzer-Avatarbild

    Hallo zusammen, ich möchte mit einem VB6-Programm Informationen aus einer HTML-Datei extrahieren. Dazu muss ich die Datei öffnen, um sie dann mit Line Input zeilenweise auszulesen. Aber wie öffne ich sie? Die Zeile Quellcode (1 Zeile) erzeugt mir einen Laufzeitfehler 52 ("Dateiname oder -nummer falsch") Danke im Voraus, Sarek \\//_

  • Benutzer-Avatarbild

    Zitat von Neptun: „Hallo Sarek, das geht mit der Api-Funktion AlphaBlend oder auch mit GDIAlphaBlend. Sieh' dir mal das an: activevb.de/cgi-bin/upload/download.pl?id=3348“ So, ich habe das Projekt jetzt endlich umsetzen können (es waren noch ein paar Voraussetzungen zu schaffen). Danke für den Tipp, es hat geklappt (war aber ganz schön Arbeit, die eigentliche Funktion aus dem Projekt herauszulösen)

  • Benutzer-Avatarbild

    Zitat von petaod: „Aber einen SMTP-Server hast du schon? ;)“ Beim WebHoster unserer Domäne halt .... Zitat von petaod: „z.B. mit Collaboration Data Objects (CDO). Ein Beispiel findest du hier.“ Danke, das ist die perfekte Lösung. Zitat von ichduersie: „Aber da stelle ich mir die Frage, warum benutzt du VB6 und nicht .NET? Mich würden die Gründe einfach interessieren...“ Weil das Projekt bereits existiert und ich nicht mal eben über tausend Zeilen Code in .net übertrage, nur um eine neue Funktion…

  • Benutzer-Avatarbild

    Hallo zusammen, wie kann ich mit VB6 (nix .net und ohne Zuhilfenahme eines auf dem Rechner evtl. vorhandenen eMail-Clients) eine eMail versenden? Ich habe zwar einige Bespielprojekte gefunden, aber die gehen immer von einem offenen SMTP-Server aus - aber die gibt es ja kaum noch. Danke im Voraus, Sarek \\//_

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe ein VB6-Programm, welches auf einem Rechner mit Windows 7 x64 zum Laufen gebracht werden soll. Es funktioniert auch fast alles ... außer das Auslesen eines simplen Registry-Schlüssels. Beide mir bekannten Wege1. RegRead 2. RegOpenKey aus der advapi32.dll die unter Windows XP noch einwandfrei funktioniert haben, gehen jetzt nicht mehr. Im Internet habe ich gelesen, dass man mit diesen Funktionen nur auf den Zweig Wow6432Node zugreifen kann. Aber was ich leider nicht gefun…

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe mit dem Programm SELFCERT (Bestandteil von Office 2003) ein Zertifikat zum Signieren von Quellcode erstellt. Unter Access klappt das problemlos, das VBA-Editor hat einen eigenen Menüpunkt zum Signieren von Code. Mich würde jetzt mal interessieren, ob ich mit dem Zertifikat auch meine von Office unabhängigen VB6-Projekte zertifizieren kann. In Microsoft Visual Basic 6 finde ich allerdings keinen entsprechenden Menüpunkt. Laut diversen Foren sollte es von Microsoft ein Pro…

  • Benutzer-Avatarbild

    Hallo Neptun,Zitat von Neptun: „1. Zweite Picturebox zur Entwurfszeit hinzufügen. Visible = False, Autoredraw = True, Einheit Pixel, Borderstyle = 0 2. Die Quellpicturebox muss ebenfalls Autoredraw = True, Einheit Pixel haben.“Ist das mit der Einheit Pixel unbedingt notwendig? Ich habe da jetzt "benutzerdefiniert" stehen, und ich weiß noch, was das damals für ein Gefummel war, damit die Längenangaben sich richtig berechnen ließen. Die Definition der PictureBox, in der das Polygon bisher eingezei…

  • Benutzer-Avatarbild

    Hallo Herr der Meere ;)Zitat von Neptun: „Für transparentes Zeichnen (ohne Animation) folgende Vorgehensweise: 1. Rechteckigen Bildausschnitt ermitteln, der vom Polygon überzeichnet wird. 2. Diesen Bildausschnitt retten, also in einer nicht sichtbaren Picturebox zwischenspeichern. 3. Polygon in die Zielbitmap zeichnen. 4. Den geretteten Bildausschnitt mit Alphablend über das Polygon zeichnen. 5. Neuzeichnen erzwingen: Picturebox.Refresh“Oje, ganz schön kompliziert. Das heißt, in Wirklichkeit wir…

  • Benutzer-Avatarbild

    Zitat von Gonger96: „BitBlt kopiert dann den Bitmap DC und den des Fensters.“Ähm, wie gesagt, ich bin kein Graphik-Programmierer. Was sind DCs (für mich ist ein DC ein DomainController)? Und wohin werden die kopiert?

  • Benutzer-Avatarbild

    Hallo Neptun,Zitat von Neptun: „das geht mit der Api-Funktion AlphaBlend oder auch mit GDIAlphaBlend. Sieh' dir mal das an: activevb.de/cgi-bin/upload/download.pl?id=3348“das sieht gut aus. Ich bin allerdings aus dem Code nicht ganz schlau geworden, da ist viel zu viel Schnickschnack rund um die eigentliche Funktion herum. Wenn ich es richtig gesehen habe, wurde dort (beim Polygon-Beispiel) auch die Polygon-Funktion verwendet. Heißt das, daß die AlphaBlend-Funktion zusätzlich mit eingebaut wird?…

  • Benutzer-Avatarbild

    Hallo zusammen, ich nutze folgenden Code, um in einer PictureBox auf einem Hintergrundbild eine Raute einzuzeichnen: Visual Basic-Quellcode (72 Zeilen) Ich möchte die Raute nun allerding nicht opak ausfüllen, sondern "halbtransparent", also sagen wir mal mit 60% Transparenz. Geht das mit dieser Funktion? Oder gibt es eine andere Funktion, mit der das geht? Für zierführende Hinweise Danke im Voraus, Sarek

  • Benutzer-Avatarbild

    Zitat von SpaceyX: „Jedoch macht es mir stark den Eindruck, dass Du VB6 auch nicht wirklich gemeistert hast. Nimm mir diese Aussage nicht übel, es ist überhaupt kein Angriff.“Auch das habe ich ja in dem anderen Thread durchaus eingeräumt. Zitat von ErfinderDesRades: „mal annere Frage: Warum programmierst du noch son Steinzeit-Kram?“Weil ich mich da wenigstens in der Systematik zurechtfinde. Ich habe Programmieren im Prinzip auf einem Commodore 64 gelernt. Das "klassische" Visual Basic kommt dem …

  • Benutzer-Avatarbild

    Hallo zusammen, in VB6 gibt es ja den TYPE-Befehl, mit dem man benutzerdefinierte Typen deklarieren kann, z.B. Quellcode (7 Zeilen) Das hat dann vom Aussehen her ja schon gewisse Ähnlichkeiten mit einem Objekt [z.B. Lauf(1).Temperatur]. Kann man da jetzt auch irgendwie Methoden zu programmieren, so daß Lauf1(1).Geschwindigkeit z.B. den Code Lauf(1).Strecke / Lauf(1).Dauer ausführt? Danke im Voraus, Sarek

  • Benutzer-Avatarbild

    Zitat von Thilo87: „Du brauchst die Anzahl der Elemente im Array ja nicht manuell ermitteln, wenn diese bereits mit UBound(Array)+1 ermittelbar sind. Also lässt du die "Anzahl"-Variable weg und rechnest am Schluss "Mittelwert = Summe/(Ubound(wert)+1)".“Ne, das geht nicht, aber das hat sonne75 ja schon erklärt. Zitat von ErfinderDesRades: „du hast Thread-Prefix vb6 eingestellt, aber dein Code sieht nach vb.net aus. in vb6 gibts glaub nix wirklich einfaches, aber in .net schon. edit: achnee, VB.Ne…

  • Benutzer-Avatarbild

    Zitat von sonne75: „Ich finde deinen Ansatz genau richtig und würde es genau so machen.“Das heißt, es gibt keine vorgefertigte Funktion oder so? Hast du auch einen Vorschlag zum kompletten Löschen der Inhalte eines Arrays (siehe Frage 1)?

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe verschiedene Funktionen, die auf Arrays angewendet werden sollen, z.B. Mittelwert eines Arrays ermitteln und so weiter. Wie kann ich nun den Namen eines Arrays dieser Funktion übergeben, damit die Funktion auch weiß, auf welches Array sie angewendet werden soll? Beispiel: sub main() Dim Tageswerte(31) As Double ... Monatsdurchschnitt = ArrayMittelwert("Tageswerte") End Sub Function ArrayMittelwert(Arrayname) Anzahl=0 Summe=0 For Zaehler = 0 to ubound(Arrayname) Hier ist …

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe mal zwei Fragen zu Array-Variablen Erstens: Wie leere ich ein Array (numerische Variablen) möglichst schnell komplett? Und mit Leeren meine ich nicht nur auf 0 setzen, sondern wirklich leeren. Das ist dann nämlich für die zweite Frage relevant. Zweitens: Ich möchte den Mittelwert eines Arrays zu ermitteln? Also zum Beispiel: wert(1) = 2 wert(2) = 5 wert(3) = 0 wert(4) = Leer (siehe erste Frage) wert(5) = 1 Durchschnittsermittlung: Summe der Werte: 2 + 5 + 0 + 1 = 8 Anzah…