Suchergebnisse

Hey netpun, vielen Dank für deinen Tipp. Im Timer Event läufts. Kannst du mir erklären warum das so ist, dass Unload nicht in jeder Sub/Event funktioniert? Gibt es noch mehr solche "Problem-Befehle"? Grüße, m3rlin

Hallo VB-Paradise, ich brauche mal wieder eure Hilfe. Ich habe ein Formular, auf dem ich Bilder in ein ImageBox-Array lade. Wenn ich Bilder aus einem Anderen Verzeichniss laden möchte sollen die alten ImageBoxen erst entladen werden. Tue ich dies in der Prozedur bevor die neuen Bilder geladen werde, kommt der Fehler: "Laufzeitfehler 365: Entladen in diesem Kontext nicht möglich". Mache ich mir einen Button mit dem Code zum entladen funktioniert es einwandfrei. Das versteh ich nicht. Was hat sich…

Der Fehler "Index außerhalb des gültigen Bereichs" kommt wahrscheinlich daher, dass du keine 9 Zeilen hast. Probiers es mal so:Visual Basic-Quellcode (7 Zeilen) Tabelle.Rows gibt die Anzahl der Zeilen zurück. Gruß, m3rlin

Ich versteh dich jez nicht so ganz. Das Datum jeder Zeile kannst du doch als String in die Datei schreiben. Und für jede Zeile im FG machst du eine neue Zeile in der Datei. Die einzelnen Felder einer Zeile trennst du mit einem Trennzeichen(zb.: ";"). Beim einlesen gehst du die Datei Zeilefür Zeile durch. Gruß, m3rlin

Du könntest den Inhalt des Flexgrid in eine Datei speichern. Wie du Dateien schreibst und liest wird in den FAQ beschrieben. Gruß, m3rlin

Moin moin, ich hab auch mal wieder ein Problem. Dieses mal will das DataControl von VB sich einfach nicht mit dem neuen Access2003-Dateiformat vertragen. Mein Problem: Ich möchte eine AccessDB mit dem DataControl öffnen um es als Datenquelle für ein DBGrid zu benutzen. Visual Basic-Quellcode (4 Zeilen) Folgende Einstellungen fürs Data1:- Connect: Access - DefaultCourserType: 0 Standart - DefaultType: 2 Jet - Options: 0 - ReadOnly: True - RecordsetType: 2 Snapshot - Recordsource: <Tabellenname> "…

Also ich hab mal bei Wikipedia geschaut:- ICQ - OSCAR Da findet man einige interessante Infos (unter anderem die Nutzungsbedingungen, was aber nicht zum Thema gehört). Was du dir angucken musst ist das OSCAR-Protokoll. Ich vermute stark, dass du nur Sachen vom ICQ-Account auslesen kannst, wenn du dich auf dem Server einloggst und ein ICQ "nacharmst". Problem ist nur, dass das OSCAR nicht veröffentlicht wurde. Das ist bestimmt eine Sissifus-Arbeit, das ganze OSCAR-Protokoll zu endschlüssen. Gut, …

Ach du schreck! Du hast Recht. Mir ist ernsthaft erst jetzt aufgefallen was für ein Schwachsinn mein Code ist. *schäm* Nett, dass du mir nur indireckt zeigst, dass ich offensichtlich einfachster mathematischer Grundrechenarten nicht fähig bin. Bzw. Nicht fähig sie in Code umzusetzten. oh man.... wie peinlich... *rotwerd* Hoffentlich sieht das keiner. Jetz kann ich mich hier wohl nicht mehr Blicken lassen. Gruß, m3rlin

Danke für eure Hilfe! Es ist gut zu wissen, dass man sich auf euch verlassen kann! Mit Unknowns Lösung geht es.... Warum verstehe ich zwar nicht ganz, denn im Endeffekt macht mein Code das gleiche, nur dess er Seitenverhältniss und Prozentsatz in einer Zeile berechnet. @Agent: Ohne die 33 % mehr, wäre das Bild total verzerrt. (hatte ich aber auch dabei geschrieben) @Unkown: Die PicBox ist sichtbar Gruß, m3rlin

Hi, Malcolm! Mein Problem ist nicht das Bild auszudrucken, sondern es zu skalieren. Ein Bild in allen Positionen und Größen drucken kann ich ja, aber es so zu verkleinern das das Setienverhältniss bestehen bleibt, dass ist mein Problem. Trotzdem danke. Versteht denn keiner mein Problem? Guckt euch doch mal meinen Code an, warum verzerrt der das Bild? Gruß, m3rlin

Hi, wincnc! Danke für deine schnelle Antwort! Was dein code macht ist ja einfach den Screenshot IMMER auf seitengröße zu drucken. Dabei wird das Bild verzerrt. Das ist aber nicht mein Problem. Ich muss den Screenshot skalieren, also wenn er zu groß für eine Din A4-Seite ist, muss die Seite die aus der Seite ragt verkleinert werden und die andere entsprechend auch, OHNE das Seitenverhältniss zu ändern. Folgenden Code hab ich mir mal zurechtgebaut: Visual Basic-Quellcode (34 Zeilen) Der Code passt…

moin Jungs! Ich hab auch mal wieder ein Problem. Und Zwar: Es soll ein Bild aus einer PictureBox gedruckt werden. Wenn das Bild größer ist als ein Din A4 Blatt, muss ich es verkleinern , ohne das Seitenverhältniss zu verändern. Ich hatte mir einen Code zurechtgemuschelt mit .printPicture, allerdings wurde da die Quallität dermaßen schlecht, dass man die Schrift von dem Bild schon nicht mehr lesen konnte. Was ich gemacht hab, war einfach die Skallierung auf Millimeter gesetzt und geguckt, ob bei …

Hi, Assemblerguru! Interessantes Problem! Damit die "Login-Box" kommt könntest du den Explorer vorher versteckt aufrufen: Shell "Explorer \\DaServ", vbHide da die Box wahrscheinlich erst nach einer Weile auftaucht, solltest du noch eine kleine Warteschleife einbauen... Gruß, m3rlin

oder schreib die Prozedur in ein globales Modul, anstat in eine Arbeitmappe. Gruß, m3rlin

Wenn du jedes 3Bit vertauscht, kannst du die Musikdaten doch einfach beim laden des Spiels weider entschlüsseln, so dass du im Spiel keine Performence einbusen mehr hast..... Ich find das eigentlich ne ganz gute Idee. Gruß, m3rlin

Warum machst du denn die Daten nicht mit der oben geposteten crypt() Funktion unleserlich und schreibst sie in eine Datei??? Ist doch am einfachsten?! Gruß, m3rlin

@Malcolm: Noch mehr Quellcode kann er doch nicht geben.... der steht doch komplett oben :)) @evel_king: Wenn die Textdatei(in der die Datei steht, welche geöffnet werden soll) auf C:\ liegt und den Namen test.txt hat, dann must du path = "C:\test.txt" setzten. Angenommen in der Textdatei steht hallo12.bat und pathF ist auf "C:\" gesetzt, dann wird er die Datei C:\hallo12.bat mit Notepad öffnen. (sofern sie existiert) Also path gibt den Pfad der Datei an, in der der Name der DAtei steht, die mit …

Hier der Quellcode mit Kommentar: Dim pathF As String 'Pfad wo die Datei gesucht werden soll Dim ff As Integer 'freefile Nummer Dim path As String 'Pfad wo die auszulesende Datei steht Dim lineStr As String 'eingelesene Zeile path = App.path & "\test.txt" pathF = "C:\" If Dir(path) = "" Then 'Wenn die Datei nicht existiert MsgBox "Die Datei existiert nicht!", vbCritical, "datei nicht gefunden!" Exit Sub 'beendet Prozedur End If ff = FreeFile Open path For Input As #ff 'öffnen der Datei Line Inpu…

Zitat: „Aber was ist mit Integern,Bytes, etc... “ Zahlen kannst du mit <font color="darkblue"> CStr() </font> in Text umwandeln um sie zu verschlüsslen. ZB. so <pre>crypt(CStr(int))</pre> Um aus einem String eine Zahl zu machen gibt es <font color="darkblue"> CInt(), CByte(), CLng() </font>. ZB. so <pre>int = CInt(crypt(x))</pre> Gruß, m3rlin

Hi LiMahL! Hier eine einfache Funktion, welche Strings ver- und entschlüsselt: <pre> Function crypt(code As String) As String Dim c As Long Dim bResult As Byte Dim bCode As Byte Dim XOR_chiffre As String On Error Resume Next For c = 1 To Len(Code) bCode = Asc(Mid(Code, c, 1)) bResult = bCode Xor 100 'diese Zahl kannst du beliebig ändern (<256) XOR_chiffre = XOR_chiffre & Chr(bResult) Next c crypt = XOR_chiffre End Function</pre> Um einen Text zu verschlüsseln und entschlüsseln musst du nurnoch X…

Vielen Dank! Wow! Sooo viel Code nur für nen sch.... Ping! -Naja- Es funktioniert. Gruß, m3rlin

Hallo, Leute! Kann ich WS oder einer API "pingen"? Ich möchte also feststellen, ob ein PC mit einer bestimmten IP im Netzwerkbefindet. Könnt ihr mir da weiterhelfen? Gruß, m3rlin

Vielen DANK für eure Antworten!!! Ich bekomme auch kein WS zur Laufzeit mit Events hin... Das Modul hab ich schon gefunden, aber noch nicht ausprobiert.... Eine Frage bleibt noch: Wei sieht das mit dem gebrauchen Arbeitsspeicher aus? Ist der mit dem Modul kleiner, oder mit versteckter Form?? Gruß, m3rlin

@Jue: Eye der Tip mit der Regestry hat geholfen! Da steht alles drin! Hab mir jetzt einfach eine Sicherung von dem Schlüssen gemacht und stelle die beim Windowsstart einfach wieder her. Funktioniert wunderbar! Vielen DANK!!!!!! Gruß, m3rlin

Hi! Wie kann ich ein Steuerelement benutzen, ohne es auf eine Form zu setzen? Ich möchte in einem Prorgamm(welches einfach nur die SystemZeit mit dem Internet abgleicht), welches keine Form besitzen soll, dass Winsock-Steuerelement benutzen. Das Programm läuft im Hintergrund, und ich denke mir, dass wenn es keine Form hat, es dann nicht so viel Arbeitspeicher belegt und schneller zu laden ist. Oder ist das garnicht der Fall? Gruß, m3rlin

Naja, starten und beenden ist doch auch schon ein ganz schön großer Eingriff. Warum also nicht auch die Eigenschaften ändern können?! Aber wies aussieht kann mir das wohl abschminken.... Hab mir jetz ein Programm gemacht, was den Dienst jedesmal beim Starten beendet..... Gruß, m3rlin

Ich kann lesen. Das hab ich schon geschnallt!!! Gruß, m3rlin

Hi, Marcus! Also du möchtest, dass der Benutzer die Inhalte der Liste editieren kann? Ich benutze die Windows Common Controls 6(SP 6) und da kann ich mit der Eingenschaft LabelEdit, im ListView-Steuerelement, einstellen, ob die Liste editierbar ist, oder nicht. :-? Gruß, m3rlin

um zu warten bis colComputer "gefüllt" ist kanst du folgende Schleife benutzen: while colComputer = nothing doEvents wend Gruß, m3rlin

acho so. Ich hab bis jetzt immer nur einfach Randomize geschrieben. Ohne [Zahl].... Gut zu wissen! Vielne Dank! Gruß, m3rlin