Visual Basic Forum

Verfasst am: 27.11.2011, 16:42 Aufrufe: 213

Anschließend muss ich mit einem Fremdprogramm die Einzelbilder in ein Video umwandeln - suboptimal. Ich bin auch in der Lage, diese Bilder gleich als AVI abzuspeichern, allerdings nur unkomprimiert. Jeder Versuch, Codecs zu benutzen, führt zum Absturz. Ich schaffe es auch, Ton aufzunehmen. Hier gehe ich so vor, dass ich kontinuierlich aufnehme, und wenn es eine Bewegung gibt, lösche ich die Aufnahme seit der letzt ...

Verfasst am: 12.10.2011, 12:59 Aufrufe: 338

Ach nein einen Bruteforceangriff oder der gleichen bösartiges war bisher nicht mein Ziel. Ich werde ich mal daran versuchen danke. Das sehe ich als Schritt aber etwas kompliziert an, erst auch noch den Namen einzugeben oder der gleichen, kann man das nicht einfacher machen. Hat jemand eine fertige Scriptvorlage, die man benutzen könnte oder so? Ich stehe da etwas auf dem Schlauch. Gruß DieMathematik

Verfasst am: 21.06.2011, 08:25 Aufrufe: 533

Jetzt habe ich mir überlegt, dass ich die einzelnen Funktionen in Tabs stecke und dann die Steuereditoren direkt mit rein nehme (um die teilweise 3 Fenster die sich öffnen zu unterbinden und alles in einem Fenster zu komprimieren). Problem: Ich habe einige Listviews und flexgrids, die ich für mehrere Funktionen brauche. Ist es möglich die Objekte in mehreren Tabs zu benutzen, also in mehreren sichtbar zu machen ...

Verfasst am: 17.06.2011, 10:15 Aufrufe: 434

... , Schweiz Nun zeigt es mir jedoch im DataGridView die ID des Landes an statt der Namen des Landes wie oben im Beispiel Dargestellt mit ID, FirmaA, 1 anzeigen sollte es jedoch ID, FirmaA, Deutschland. Wie kann ich den Namen und nicht die ID anzeigen lassen? Ich hoffe ihr könnt mir weiterhelfen. P.S. warum ich die Daten aus der Access DB haben will ist, dass später mehrere User das Programm benutzen ...

Verfasst am: 06.01.2011, 16:20 Aufrufe: 674

Alles funktioniert prima, aber leider nur bei abgeschaltetem Virenscanner. Das Sonar von Norton Internet Security stuft mein harmloses Programm als gefährlich ein, u. a. "weil weniger als 5 Norton-User es benutzen". Logisch, soll ja mein privates bleiben, ich habe keine kommerziellen Interessen. Mit Avira Antivir Personal funktioniert alles. Meine Frage: Kennt jemand eine Möglichkeit, dem Norton beizubri ...

Verfasst am: 01.01.2011, 21:50 Aufrufe: 3010

Generell kannst du keine Progressbar vom Visuellen Design verändern! Entweder du bastelst die eine mitn Foto Programm so an die 100 Bilder immer ein schritt vor. Oder schreibst dir deine eigene Progressbar! Möglich ab c# Mitn Fotoprogramm würd ich es zwar nicht machen..ersten bin ich zu faul für Razz

zweitens würd ich EasyGifAnimator benutzen und die Fertige Gif Datei mit IrfanView die einzelnen Dateien Exporti ...

Verfasst am: 04.10.2010, 19:51 Aufrufe: 494

Verfasst am: 27.07.2010, 18:13 Aufrufe: 667

Halli Hallo, ich habe mir überlegt ein "Nida-Pad" (ein Tablet Pc der vom Rettungsdienst für Patientendaten etc. benutzt wird) mit VB nachtzbauen, um es dann später mit in einer Simulation zu benutzen. Meine Grundlegenden Fragen: - Wie kann ich Buttons zum öffnen von neun Seiten benutzen? - Wie kann ich das "Pad" optisch anpassen? - Kann man später die Nida-Pad's mit einem zentra ...

Verfasst am: 06.05.2010, 17:46 Aufrufe: 483

Nach langem Suchen habe ich die Lösung selbst gefunden: beim login einfach die billige sperre auf value "1" setzen und schon gehts weiter ... bei den anderen beiden einfach folgendes benutzen: WebBrowserMain.Document.GetElementById("ID").InvokeMember("click") weitere befehle zu webbotting :http://thebotnet.com/programming/21514-vb-net-collection-of-web-bot.html

Verfasst am: 05.05.2010, 13:08 Aufrufe: 483

Problem: Ich kann die buttons auf den Seiten hier im IconTray-Modus nicht ansprechen, da ich die Focus & Senkeys{"ENTER"}-Methode benutze da ich den Prozess im Hintergrud laufen lassen möchte kann ich die senkeys-methode nicht benutzen, bei invokemembers("submit") wird nur aktualisiert Alle Buttons, die ich betätigen möchte: >anmelden< auf Anmelde-Seite den button hinter jak ...

Verfasst am: 24.03.2010, 13:46 Aufrufe: 539

hey wollte mal fragen wozu mann den Speicher "Timer" benutzen kann ? hab heute in Info ne Stoppuhr Programmiert da meinte mein lehrer noch zu mir das des alles einfacher gehen würde wenn ich Dim X as Timer mache allerdings hab ich da auch schon keine ahnung mehr wozu mir das weiterhelfen soll ich kann den Speicher nicht in nem Label anzeigen und auch nicht auf 0 oder ähnliches stellen ...

Verfasst am: 22.03.2010, 10:43 Aufrufe: 555

DU KANNST NATÜRLICH WENN DU BESTIMMTE PROGRAMME ÖFFNEN MÖCHTEST AUCH SHELL BENUTZEN BEISPIEL: Shell("C:\Programme\Windows Live\Messenger\msnmsgr.

Verfasst am: 14.02.2010, 21:00 Aufrufe: 580

Hallo zusammen Smile

ich versuch gerade dynamisch generierte Objekte zu verwenden erzeugen lass ich sie in einer Methode: Dim canvas As New Microsoft.VisualBasic.PowerPacks.ShapeContainer Dim pHelp As New RectangleShape With pHelp .Name = "rctshp_Shape" & CStr(iShape) .Parent = canvas End With wobei iShape einfach eine Integer Zählvariable ist. Canvas ist al ...

Verfasst am: 10.02.2010, 11:58 Aufrufe: 455

hallo leute .. also ich will jetz endlich anfangen mit dem coden .. was ich benutzen wollte wär vb 08 .. ist das das richtige ? für anfänger ? naja aufjeden fall schaff ich es nich allein xD d.h. breuchte öfter hilfe von usern ja .. bin ich hier richtig um vb 08 zu lernen ? bekommt man hier hilfe ? oder was würdet ihr mir empfehlen wie ich starten soll ? naja das war erstmal mfg

Verfasst am: 10.01.2010, 16:17 Aufrufe: 995

Es gibt eine Spalte in Excel in der jeweils unterschiedlich viele Bild-Dateinamen (immer gleiche länge) in einer Zeile aufgeführt sind (durch Zeilenumbruch getrennt). Jeder dieser Dateinamen soll nun zu einem Hyperlink konvertiert werden und z.b. auf /fotos/DATEINAME verlinken. Wäre es jeweils nur ein Dateiname, dann könnte ich einfach =HYPERLINK(link,name) benutzen. So ist es aber etwas komplizierter. Ich habe mi ...

Verfasst am: 23.11.2009, 00:00 Aufrufe: 294

Hallo, ich habe schon überall gesucht aber immernoch nichts gefunden. Sad

Es geht um folgendes Problem: Ich möchte eine PNG als Hintergrundbild eines Fensters benutzen. Diese PNG hat semitransparente Stellen, durch die der transparente Hintergrund scheinen soll. TransparencyKey alleine reicht also nicht aus. Es ist ja leider nicht möglich, die BackColor auf Transparent zu setzen, kennt jemand eine andere Lösung? I ...

Verfasst am: 22.11.2009, 11:56 Aufrufe: 3552

Spieleprogrammierung mit XNA - Teil 1Hallo,in dieser Tutorialreihe möchte ich euch die Grundkenntnisse von XNA übermitteln. XNA ist das GameStudio von Microsoft und macht das Erstellen von Spielen (laut Hersteller) Kinderleicht!Im ersten Teil dieses Tutorials geht es zunächst um die Installation von XNA und wie ihr das Studio in VB.NETbenutzen könnt. Es wird der Compiler Visual Basic/Studio 2008 in der Expressedition ...

Verfasst am: 14.11.2009, 19:06 Aufrufe: 544

de/xy.php", "", bytArguments, "Content-Type: application/x-www-form-urlencoded" + Environment.NewLine)Dieser code geht jedoch nicht. dann habe ich versucht, die seite auf zu rufen und dann das RaiseEvent("onclick") zu benutzen. Dim theElementCollection As HtmlElementCollection = webbrowser1.Document.GetElementsByTagName("image") ...

Verfasst am: 19.10.2009, 21:35 Aufrufe: 1415

Hallo, ich wollte fragen wie ich 2 VB Clienten über einen Server verbinden kann? Der zweck dafür ist ein Funkspiel (Feuerwehr und Rettungsdienst). Grundidee: User hat einen Client mit verschiedenen Status tasten. Leitstelle hat einen Client mit einer Übersicht. Zum sprechen benutzen wir Teamspeak. Über antworten würde ich mich freuen Very Happy

Lg Funkstation

Verfasst am: 08.09.2009, 08:02 Aufrufe: 320

Verfasst am: 29.08.2009, 11:14 Aufrufe: 748

... mmt er *Hallo1* dann *Hallo2* dann *Hallo3* und so weiter in einem RichTextBox aber ich möchte ja noch ein label haben, der dann sagt wie oft ich bereits gespammt hab also sobald *Hallo1* gespammt wurde, soll dann der Label sich auf 1 ändern auch bis unendlich usw.. könnte mir jemand vielleicht einen code für sowas posten oder erklären wie sowas geht?ich glaub dafür muss man so ne If-schleife funktion benutzen ...

Verfasst am: 09.07.2009, 16:37 Aufrufe: 603

FreeCap -- is a program for transparency redirect connections from programs through SOCKS server. In fact that some programs hasn't native SOCKS support (for example Internet Explorer), In this case FreeCap will be helpful, transparently redirect all connections requests through SOCKS server.Diese Programme kann man für jede beliebige anwendung benutzen, also alle verbindungen werden über einen proxy geleitet.Finde d ...

Verfasst am: 29.06.2009, 14:01 Aufrufe: 801

htmEine Liste der ScanCodes findet man hier: http://winfaq.de/faq_html/Content/tip1576.htmAchtung: Man sollte diese Funktion nur dann benutzen wenn man sich mit der Materie auskennt da es sonst zu Problemen kommen kann.Hier ein Beispielaufruf wenn man die Taste "ESCAPE" mit der Taste "A" vertauschen will:'SetScanCodes(New Byte() {&H1, &H0, &H1E, &H0}, New Byte() {&H1E, &H0, &H1, &H0})Funktion:Visual Basic: Quelle: do ...

Verfasst am: 29.06.2009, 13:16 Aufrufe: 757

... irekt in ein Bytearray entschlüsseln will oder wenn man ein Bytearray verschlüsseln will und das Ergebnis in ein anderes Bytearray speichern will.Das bietet den Vorteil das man nicht ständig temporäre Dateien oder Variablen verwenden muss.PS: Für die Salzwerte habe ich irgendwelche Werte festgelegt die natürlich verändert werden können oder man benutzt die entsprechende Eigenschaft um eigene Salzwerte zu benutzen ...

Verfasst am: 17.06.2009, 17:16 Aufrufe: 732

Beschreibung: Mit diesem Code kann man bequem ohne den Webbrowser zu benutzen den Quelltext einer Internetseite anzeigen und runterladen. Man muss nur die URL angeben. Code: Function get_pagesource(ByVal url As String) As String Try Dim Request ...

Verfasst am: 17.06.2009, 08:28 Aufrufe: 870

Ein Extra was ich in Zukunft noch einbauen werde, beziehungsweise versuche, wird sein, dass es eine Möglichkeit gibt, mehrere Benutzer einzustellen, mit jeweils unterschiedlichen Filmen. Hatte gedacht, dass ich das über Ini Dateien löse aber das muss ich erst noch ein Mal überdenken. Vielleicht lass ich es auch ganz, da man dieses Programm wohl eh nur alleine benutzen wird. Ahja, erm, es gibt Popupmenüs, hab ganz ve ...

Verfasst am: 17.06.2009, 08:15 Aufrufe: 1513

Das ist das erste Programm von mir was fertig geworden ist und komplett in VB6 geschrieben. Unterschiede zu encos Accountbase: Kann (meines Wissens nach) nicht so leicht geknackt werden (einfach das Passwort löschen geht nicht weil die Daten dann nicht mehr entschlüsselt werden können) Mehrere Benutzer (es können mehrere Benutzer mit unterschiedlichen Passwörtern benutzen, jeder Benutzer kann nur die von ihm gespe ...

Verfasst am: 15.06.2009, 17:56 Aufrufe: 1037

Die Funktion ruft man in anderen Subs nun auf, indem man den Rückgabewert in einer neuen Variable speichert.In unserem Beispiel:Dim NewString As String NewString = CutString("AlterString", "ZuEntfernenderString")Anmerkung: Diese Funktion ist nicht besonders gut geworden, da man sie nur benutzen kann, wenn ein String nur an einer Stelle des Strings vohanden ist. Die Funktion dient nu ...

Verfasst am: 15.06.2009, 11:55 Aufrufe: 638

Thema: Enums nutzenAutor: exe-cuteHier ein TUT fuer das benutzen eines Enums.Mit einem enum gelingt folgendes:Lets go:Enum:Die sub:(mir faellt grade auf, bei Case Mogen is die MassageBox Falsch. Ich denk aba das wird jeder cheggen.)Dies ist nun ein beispiel, zu welches man ein enum benutzen kann. EIn enum hat jedoch nicht immer die werte 1,2 oder 3.Meist haben sie laengere werte die man sich nicht alle merken moechte ...

Verfasst am: 15.06.2009, 11:35 Aufrufe: 2514

(OverWriteFiles)Hier könnt ihr also gleich bestimmen ob eine schon existierende Datei einfach überschrieben wird, oder nicht.Verlangt natürlich einen Boolean Wert. True oder False.6. Verschieben Syntax:Call FSO.MoveFile(Source, Destination)Wir benutzen also ".MoveFile".Source und Destination sollte jetzt klar sein.Aus welchem Grund auch immer kann man mit der Funktion leider die Dateien nicht auf ein anderes ...

Verfasst am: 15.06.2009, 11:32 Aufrufe: 1364

Werte übergebenIhr möchtet eurer Function/Sub Daten übergeben die sie für eine Aufgabe braucht?Ganz einfach.Egal ob Sub oder Function. Ihr könnt in den Klammern ganz einfach Variablen deklarieren.Private Function Test(nZahl as long, sBuffer as string) as Boolean Test = True End FunctionWenn ihr diese Function benutzen wollt, dann müßt ihr in der Klammer also zwei Werte übergeben.Ein Aufr ...

Verfasst am: 15.06.2009, 11:31 Aufrufe: 1157

So bleibt also nur die eine Zeile übrig.Das war es auch schon mit den Verbesserungen zum Code.ListboxJetzt erkläre ich euch noch was es mit der Listbox auf sich hat.Listboxen sollte man nur benutzen wenn man dem Benutzer etwas anzeigen muß.Zum einfachen zwischenspeichern von Daten ist es sehr ungeeignet, auch wenn es einfach zu handhaben ist.Für das einfache speichern von Daten wäre ein Array die bessere Wahl.Mit ein ...

Verfasst am: 15.06.2009, 11:29 Aufrufe: 1034

txt:a.txt“Das liegt daran, dass notepad mit solchen verstecken Dateien umgehen kann. Leider kann das nicht jedes Programm. Ausführbare Dateien sind in der Regel kein Problem, aber Filme und andere Dateien hängen von den benutzen Programmen ab. Außerdem kann man Streams auch an Ordner hängen und nicht nur an Dateien.Es gibt übrigens auch Programme mit dem man Alternate Data Streams aufspüren kann. Hier ein Link zu so ...

Verfasst am: 15.06.2009, 11:20 Aufrufe: 2339

Zeile: Hier lesen wir die angehängten Infos aus. Wenn ihr im Builder 100Bytes angegeben habt, dann müßt ihr hier unbedingt 99 angeben, da sonst ein Zeichen zuviel eingelesen wird.5. Zeile: Das hier ist eine sehr wichtige Funktion, die ihr sicher auch noch in Zukunft sehr oft benutzen werdet. Mit Split wird der lange string, gespalten bzw. getrennt. Und nämlich überall dort, wo wir unser Trennungzeichen geschrieben ha ...

Verfasst am: 15.06.2009, 11:16 Aufrufe: 1746

Private Sub ws_Close() Label1.Caption = "Connection lost" End SubDas waren jetzt mal so die Standard Sachen für eine simple Winsock Verbindung.Jetzt benutzen wir noch das Common Dialog Control im Button, damit ihr später einfach eine Datei aussuchen könnt.Private Sub Command1_Click() On Error GoTo Err: With cdlg .CancelErr ...

Verfasst am: 15.06.2009, 11:15 Aufrufe: 1847

1. Wozu braucht man ein PopupMenu?Popmenüs können sehr praktisch sein, besonders für den User der euer Programm in Zukunft benutzen soll, da man viele Funktionen schnell zu Verfügung hat.Besonders, wenn man sein Programm nur als TrayIcon anzeigen lässt ohne Form am Desktop, ist ein PopupMenu sehr hilfreich, da dem Benutzer über einen Klick auf das Trayicon die Möglichkeit gegeben wird, schnell und einfach zu entschei ...

Verfasst am: 15.06.2009, 11:12 Aufrufe: 2410

Count If StrComp(lv.ListItems(i).Text, "David" , vbTextCompare) = 0 Then Call MsgBox("David ist an der Stelle " & i & " in der Liste.", vbInformation, "David gefunden") End If Next iWir benutzen also wieder eine Schleife um jeden Eintrag zu überprüfen.Dieses Mal läuft die Schleife nicht von 1 bis 10, sond ...

Verfasst am: 15.06.2009, 11:05 Aufrufe: 3579

dbOpenForwardOnlyErklärung:Im Modus OpenDynaset wird nicht direkt in die Tabelle geschrieben, sondern die Veränderungen zuerst zwischengespeichert und erst nach einem Refresh der DB sichtbar. Bei OpenTable greift man direkt auf die Tabelle zu und es lässt sich die besonders schnelle „Seek“ Methode zum suchen benutzen.OpenSnapShot funktioniert gleich wie OpenDynaset, nur das hier nicht in die DB geschrieben, sonde ...

Verfasst am: 04.06.2009, 18:32 Aufrufe: 291

Mach mit Gimp oder Photoshop eine Gif-Animation draus, dann kannst du es als normales (aber animiertes) Bild benutzen. Falls du nicht weißt, wie das geht, kannst du die Bilder mal posten, ich mach's dir dann.

Verfasst am: 03.05.2009, 11:38 Aufrufe: 2107

'Erste Spalte With nField .Name = "ID" .Type = dbLong .Attributes = dbAutoIncrField nTableDef.Fields.Append nField Set nField = Nothing End With (With nField) Wir benutzen also die Variable nField um die Felder zu erstellen. (.Name) Hier weisen wir der Spalte einen eindeutigen Namen zu. (.Type) Hier geben wir den Typ an. Optionen: dbBinary: BINARY dbBoolean: BIT ...

Verfasst am: 29.04.2009, 11:47 Aufrufe: 1773

Aber ich bekomm ständig die Meldung, dass "Der Provider nicht gefunden werden kann. Möglicherweise ist er nicht richtig installiert". Ich will den "Provider = PostgresSQL OLE DB Provider" benutzen, habe aber leider nirgends eine Quelle gefunden wo ich den herbekommen kann um ihn bei mir zu installieren. Hat vielleicht von euch einer eine Ahnung wo ich an den benötigten Provider drankomme, so d ...

Verfasst am: 23.04.2009, 21:55 Aufrufe: 938

Hier ein TUT fuer das benutzen eines Enums. Mit einem enum gelingt folgendes: Lets go: Enum: Die sub: (mir faellt grade auf, bei Case Mogen is die MassageBox Falsch. Ich denk aba das wird jeder cheggen.) Dies ist nun ein beispiel, zu welches man ein enum benutzen kann. EIn enum hat jedoch nicht immer die werte 1,2 oder 3. Meist haben sie laengere werte die man sich nicht alle merken moechte. Ihr ...

Verfasst am: 22.04.2009, 14:11 Aufrufe: 743

Guten Abend, Ich wollte mich gerade daran begeben, ein kleines 3D spiel in VB zu coden unter verwendung von DirectX etc.. Nunja, da dachte ich mir, anstatt die Vertexe mit DirectX erstellen zu lassen, wäre es doch besser, die Figuren etc schon mit Cinema4D zu erstellen, und dann in VB zu verwenden... Nunja, leider weiß ich nicht, ob, und wenn ja, wie das geht... Wäre nett, wenn mir jemand darauf eine Antwort ge ...

Verfasst am: 12.04.2009, 15:35 Aufrufe: 1975

Die Funktion ruft man in anderen Subs nun auf, indem man den Rückgabewert in einer neuen Variable speichert. In unserem Beispiel: Dim NewString As String NewString = CutString("AlterString", "ZuEntfernenderString") Anmerkung: Diese Funktion ist nicht besonders gut geworden, da man sie nur benutzen kann, wenn ein String nur an einer Stelle des Strings vohanden ist. Die Funktion di ...

Verfasst am: 09.04.2009, 09:48 Aufrufe: 766

Danke. Ich Frage mich aber nur ob ich gerade dieses Trennzeichen umgehen kann, da es die Größe ja nurnoch hochsprengt. Außerdem versteh ich nicht warum ich ein Array benutzen soll. Das ganze lässt sich doch auch mit einer einzelnen String-Variable mache, oder?

Verfasst am: 08.03.2009, 19:26 Aufrufe: 606

dll", SetLastError:=True)> _ Public Shared Function ReadProcessMemory( _ ByVal hProcess As IntPtr, _ ByVal lpBaseAddress As IntPtr, _ ByVal lpBuffer As IntPtr, _ ByVal iSize As Integer, _ ByRef lpNumberOfBytesRead As Integer) As Boolean End Function der ist für das berümte ReadProcessMemory wie kann ich das jetzt benutzen das ich daraus was machen kann ...

Verfasst am: 06.03.2009, 14:14 Aufrufe: 595

Das Problem: Es gibt ein Program, das kennt die Pfad von Movies in PPT2002 oder 2003. Wenn ich dieses Program mit PPT2007 benutzen will, leider funktioniert es nicht. Ich möchte meine Frage oder Problem besser äußern. Es gibt alte Vorlesung folien. Wir wollen diese folien erneuern, nicht den Inhalt sondern nur die Hintergrund farben. Währen die Konvertierung hatten wir einige Movies verloren, und einige Mo ...

Verfasst am: 04.03.2009, 20:15 Aufrufe: 435

hi, weiß wer, wie man einen timer in einer dll benutzen kann??? ein normaler funktioniert ja nicht wirklich kann das helfen? (ich check den src nicht) http://www.activevb.de/tipps/vb6tipps/tipp0433.html

Verfasst am: 26.02.2009, 14:46 Aufrufe: 2393

kann man line input mehrmals in einem schleifendurchlauf benutzen?

Verfasst am: 17.02.2009, 17:29 Aufrufe: 1273

'und jetzt kommt dein code Private Sub generiern_Click() 'und dann funktionierts auch lg Puhhh... nach langen suchen "googel" und denken hab ich es doch noch hinbekommen.... Ich dachte ich müsste nach deiner hilfe "Integer" benutzen das war nach vielen fehl versuchen nicht der fall ich hab den befehl "Static generieren As Long" benutzt... Gefunden nach vielen v ...