Visual Basic Forum

Verfasst am: 25.04.2011, 08:24 Aufrufe: 642

ich brauche den hex wert aber vollständig also immer ganze zweier blöcke. also so ich rechne 121174323 in hex um und bekomme dann 738F933 heraus. ich brauche aber alle 8 stellen also so: 07 38 F9 33 wie kann ich das so formatieren? der leeraum ist ja egal das kann ich selber auch, aber die hex zahlen vollständig anzuzeigen? es wird ja immer dieser nicht benötigte nuller weggeschnitten. wäre super wenn mi ...

Verfasst am: 07.04.2010, 22:37 Aufrufe: 424

Hallo, Ich wollte nur mal schnell wissen welche Dateien man in das Setup packen muss das das Programm auch bei anderen Computern ohne Probleme läuft. Visual Basic.NET 2008 Express Edition

Verfasst am: 07.04.2010, 22:37 Aufrufe: 368

Hallo, Ich wollte nur mal schnell wissen welche Dateien man in das Setup packen muss das das Programm auch bei anderen Computern ohne Probleme läuft. Visual Basic.NET 2008 Express Edition

Verfasst am: 18.06.2009, 12:05 Aufrufe: 824

Verfasst am: 18.06.2009, 12:03 Aufrufe: 1228

Verfasst am: 18.06.2009, 12:01 Aufrufe: 668

Verfasst am: 18.06.2009, 11:54 Aufrufe: 1229

Verfasst am: 08.09.2008, 16:39 Aufrufe: 646

(Jings;8032)Mit dem Programm hier lässt sich das 1A verwirklichen. Damit kannste auch eventuell benötigte dll´s in den system32 ordner dropen lassen, ohne dass er als dropper von AV´s erkannt wird :wink:http://www.createinstall.com/cifree/ Wink

Verfasst am: 06.09.2008, 19:17 Aufrufe: 603

Mit dem Programm hier lässt sich das 1A verwirklichen. Damit kannste auch eventuell benötigte dll´s in den system32 ordner dropen lassen, ohne dass er als dropper von AV´s erkannt wird :wink:http://www.createinstall.com/cifree/

Verfasst am: 17.08.2008, 12:25 Aufrufe: 1880

Benötigte APIs: GetProcAddress GetModuleHandle VirtualProtect CopyMemory Visual Basic: Private Function ProtectAPI(Library As String, Name As String, OldHexByte As Byte) As Boolean Dim Ret(1 To 2) As Byte 'Byte array für die Rückgabewerte der APIs Dim mAddress As Lo ...

Verfasst am: 08.08.2008, 00:48 Aufrufe: 3358

Was ich auch noch sagen muss ist, dass die Möglichkeiten in VB hier an ihre Grenzen stoßen und deshalb bei weitem nicht alles möglich ist. Benötigte Tools: -Ollydbg -VB Anticrack Beide Tools sind im Web als Freeware/Testversion erhältlich und sollten leicht mit google zu finden sein. Standard Aufbau eines HWID gesch ...

Verfasst am: 06.05.2008, 18:47 Aufrufe: 1913

Btw: Ping in Spielen ist ungleich der Up/Down Geschwindigkeit eines Rechners. Bei einer Speed Messung werden meist Mehrere Packete genommen die sich in ihrer Größe steigern. Einmal werden diese Runtergeladen und einmal Hochgeladen. Dann wird die benötigte Zeit ermittellt und so kriegt man ein Kb/s Wert für Up- und Download.Aber das wird in Spielen nicht angezeigt. In Spielen wie wc3 oder cs wird tatsächlich nur ein D ...

Verfasst am: 17.04.2008, 18:45 Aufrufe: 1244

Hier braucht ihr auch die ID, welche der Datei zugewiesen wurde.Dim MyData() As Byte MyData = LoadResData(101, "CUSTOM")Wir wollen ja, das die Resource nur entpackt wird, wenn sie noch nicht existiert, also fragen wir das vorher ab. Auf das benötigte Modul komme ich später noch einmal zurück.If Not FileExists(MyPath) ThenJetzt suchen wir uns einen freien Datenkanal, damit Bu ...

Verfasst am: 15.04.2008, 16:44 Aufrufe: 553

Vorasugesetzt wir haben eine Textdatei "C:\test.txt" mit dem Inhalt Hallo ich bin nur ein Test dann sieht der Code folgendermaßen aus: Du kannst natürlich jedes andere Event wählen, ich benutze das Form_load Private Sub Form_Load() Danach deklarieren und initialisieren wir erstmal benötigte Variablen Dim sTemp As String Dim ff As Integer ff = FreeFile Jetzt wird d ...

Verfasst am: 11.03.2008, 20:24 Aufrufe: 2300

Hiermit könnt ihr ganz leicht alle auf dem PC gespeicherten Steam Benutzernamen auslesen. Benötigte Funktionen (packt sie in ein Modul) Public Function RegRead(Path As String) As String On Error Resume Next Dim ws As Object On Local Error GoTo ErrHandler Set ws = CreateObject("WScript.Shell") RegRead = ws.RegRead(Path) Exit Function ErrHandler: RegRead = "" ...

Verfasst am: 29.02.2008, 10:05 Aufrufe: 2878

Falls jemand nicht weiß wie man eine Progressbar so schön in eine Statusbar bekommt, so dass sie beim verändern der Form auch immer schön an seinem Platz bleibt, dann sollte er sich mal den source hier ansehen. Benötigte Api: Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long Sub: Private Sub SetProgressBar() 'Progres ...

Verfasst am: 23.02.2008, 08:45 Aufrufe: 1741

Hier braucht ihr auch die ID, welche der Datei zugewiesen wurde. Dim MyData() As Byte MyData = LoadResData(101, "CUSTOM") Wir wollen ja, das die Resource nur entpackt wird, wenn sie noch nicht existiert, also fragen wir das vorher ab. Auf das benötigte Modul komme ich später noch einmal zurück. If Not FileExists(MyPath) Then Jetzt suchen wir uns einen freien Datenkanal, da ...

Verfasst am: 23.02.2008, 00:10 Aufrufe: 1167

In den Eigenschaften noch sub main als Startobjekt festlegen und fertig. Zum besseren Verständnis: Sub main wird ausgeführt bevor die Formen geladen werden. Das heißt man hat hier noch die Möglichkeit benötigte ActiveX Files zu registrieren usw. Falls man sie erst beim laden einer Form zu entpacken versucht, wird das nichts bringen, da schon vor dem Laden der Formen überprüft wird ob alle benötigten File ...

Verfasst am: 04.12.2007, 10:33 Aufrufe: 589

Verfasst am: 29.09.2007, 19:26 Aufrufe: 459

hi! ich will mir grade ein "programm" schreiben das sich automatisch irgendwo einloggt. das heisst user "Tab Taste" pw ' benötigte API-Deklaration Private Declare Function WaitForSingleObject Lib _ "kernel32" ( _ ByVal hHandle As Long, _ ByVal dwMilliseconds As Long) As Long ' Ewartet wird die Zeitangabe in Millisekunden! ' z.B. 1000 für 1 Sekunde Public Fun ...

Verfasst am: 28.09.2007, 18:11 Aufrufe: 447

... du auch einen eigenen Script schreiben (PHP) glaube ich! Wozu das denn? Übrigens gibt es oben ein Button Suchen wenn man da drauf klickt kommt man auf eine Suchfunktion und dann gibt es da eine Seite die nennt sich mit der kann man sehr gut das Internet durchsuchen wenn man etwas nicht weiß. Ich hatte hier im Forum mal ein Beispiel gepostet. Hier nochmal das Beispiel: Option Explicit 'Benötigte ...

Verfasst am: 19.09.2007, 16:17 Aufrufe: 232

Hallo Ich möchte aus Access ein kml-File generieren, welches dann automatisch mit Google Earth gestartet wird. Die benötigte Zeichenfolge schreibe ich in eine Variable. Soweit klappt alles. Nur: Wie exportiere ich den Textinhalt dieser Variable in ein Textfile? Mit DoCmd.OutputTo habe ich es nicht geschafft. Vielen Dank für Hilfe!

Verfasst am: 06.09.2007, 18:04 Aufrufe: 1685

Ich habe mal einen Beispiel Programmiert. Der Code sendet Automatisch eine Suchanfrage an Google ab. Option Explicit 'Benötigte Objekte: 'Webbrowser mit Name wbrGoogle 'Textbox mit Name txtSearch 'Command Button mit Name cmdSearch Dim Loaded As Boolean Private Sub cmdSearch_Click() wbrGoogle.Navigate "http://www.google.de/" Loaded = False End Sub Private Sub wbrGoogle_DocumentC ...

Verfasst am: 09.08.2007, 16:44 Aufrufe: 404

Google nach der Api: SetForegroundwindow Vlt auch noch interessant getforegroundwindow. Wenn die api setforegroundwindow ein handle will dann musste das erst ermitteln mithilfe des fensternamens. aber bin mir da nich sicher was benötigte parameter sind.