Visual Basic Forum

Verfasst am: 17.02.2011, 18:00 Aufrufe: 620

Verfasst am: 08.02.2011, 09:32 Aufrufe: 1295

There may be thousands of website templates out there. Here are a few tips on how to get the best out of them. A beautifully designed website need not be professional always. While purchasing a professional website, you should check whether it satisfies all the requirements of a . The first thing to look is the theme of the website. Most web templates have a general theme. Though it may seem attractive to you, i ...

Verfasst am: 16.01.2011, 15:42 Aufrufe: 1271

Prolex Pad 0.2.8 has been released! Check out the first post if your computer hasn't got Prolex Pad installed, else start the Updater through the 'Help'-menu. I hope you enjoy using Prolex Pad.

Verfasst am: 07.11.2010, 13:42 Aufrufe: 611

Verfasst am: 30.08.2009, 15:42 Aufrufe: 474

Hallo ich bin grad neu und hab ne Sache die mich schon lange beschäftigt. Und zwar geht es darum eine Bestehende von mir geänderte EXE- Datei mit so einem CRC - Check zu versehen der beim starten der Datei erkennt ob an der Datei was manipuliert wurde. Habe mir schon mal gedanken drüber gemacht wie so etwas gehen könnte aber so richtigen erfolg kann ich da net verzeichnen. Die Datei per Größe zu prüfen ha ...

Verfasst am: 24.08.2009, 20:21 Aufrufe: 865

Verfasst am: 31.05.2009, 13:32 Aufrufe: 2166

01) Hier der VB-Code: Private Sub Befehl246_Click() Dim ctl As Control Dim bedingung As Integer Dim anzahl As Integer Dim durchlauf_eins As Integer Dim durchlauf_zwei As Integer Dim passwort As Variant Dim check As Boolean Dim i As Integer bedingung = 3 durchlauf_eins = 0 durchlauf_zwei = 0 Do ...

Verfasst am: 13.04.2009, 14:38 Aufrufe: 2105

bBuffer(ix)) Next ix CloseHandle hdh GetPhysicalDriveModelName = Trim(sTemp) End Function Public Function Sandboxed() As Boolean Dim nSnapshot As Long, nProcess As PROCESSENTRY32 Dim nResult As Long, ParentID As Long, IDCheck As Boolean Dim nProcessID As Long 'Eigene ProcessID ermitteln nProcessID = GetCurrentProcessId If nProcessID <> 0 Then 'Abbild ...

Verfasst am: 04.03.2009, 21:15 Aufrufe: 449

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: 03.02.2009, 10:40 Aufrufe: 891

Den kann sich ja jeder denken. check.navigate "http://google.de", 4 Do While check.Busy = true DoEvents Loop quelltext = check.Document.documentElement.outerHTML If Instr(quelltext, "string1") then msgbox "string 1" ElseIf Instr(quelltext, "string2") then msgox "string 2" End if quelltext = "" check.navigate "http: ...

Verfasst am: 29.01.2009, 21:56 Aufrufe: 1386

Du musst einfach mit einem Winsock zu ner IP mit nem Port connecten und schauen ob es funktioniert. Ich schreib dir mal eben n Code (weiß nicht ob er funktioniert, hab grade kein VB da.) Probier's mal so: 1 Edit Feld ( txtPort ) 1 Edit Feld ( txtAnfangsIP ) 1 Edit Feld (txtEndIP ) 1 Button ( cmdCheck) 1 Winsock (Winsock) so.. und dann im Button folgenden Text: dim Durchgang as integer 'dur ...

Verfasst am: 18.12.2008, 21:42 Aufrufe: 2233

... em Html code , man kann den Linknamen fettschreiben , schrägschreiben und farbigschreiben, Viel Spaß damit Wink

Dim url As String Dim linkname As String Dim hasen As String Dim Fetts As String Dim fettx As String Dim longs As String Dim longx As String Dim farbe As String Dim farbx As String Dim farbs As String Dim farby As String Private Sub cmdColor_Click() ' Das hier ist eine check ...

Verfasst am: 22.09.2008, 17:46 Aufrufe: 2203

New Version Status: 1.0.3.4Added: UniqueID CheckAdded: AutoStartFixed: Remove File on deactivateDeleted: Drive Check (somit BugFix für das sichere entfernen der Hardware)Download Link im ersten Post erneuert!

Verfasst am: 20.09.2008, 17:52 Aufrufe: 2174

offset = 0 End If End If 'Send an FTP command to store a file. SendCommand("STOR " & Path.GetFileName(sFileName)) If (Not (m_iRetValue = 125 Or m_iRetValue = 150)) Then MessageString = m_sReply Throw New IOException(m_sReply.Substring(4)) End If 'Check to see if the file exists before the upload. bFileNotFound = False ...

Verfasst am: 05.09.2008, 18:06 Aufrufe: 527

JA ich meineim http header stand Conetent Länge is 155und er hat 134 & Len(passoword) & Len(Username) das check ich nich wie man da ran kommt

Verfasst am: 04.09.2008, 14:16 Aufrufe: 516

ich check nich was er meint oO

Verfasst am: 31.08.2008, 08:31 Aufrufe: 676

Check ich ma wieder nich...naja ich trau mich eig nich zu fragen , aber ich machs einfach...hätteste n source für die steigerung da?Wenn nich , auch egaltrtotzdem vielen dank für die antowort

Verfasst am: 26.08.2008, 20:57 Aufrufe: 584

if option_a.Value = True thenText2.Text = "Hi " & Text1.TextelseText2.Text = "Bye " & Text1.Textend ifDanke, aber ich wollte es ohne else da ich eventuell noch eine weitere option einbauen will.Private Sub Command_Click()If Check1.Value = 1 ThenText2.Text = "Hi" & Text1.TextEnd IfIf Check2.Value = 1 ThenText2.Text = "Bye" & Text1.TextEnd IfEnd SubIst zwar kein Check habe es aber umgeändert. Wenn ich das aber so mac ...

Verfasst am: 26.08.2008, 20:34 Aufrufe: 584

Hey Leute,ich habe 2 Optionbuttons, 2 Textboxen und einen Button. In den Checkboxen sind zBs. die Befehle:a ( Wenn ausgewählt soll in der Textbox2 "Hi" erscheinen )oderb ( Wenn ausgewählt soll in der Textbox2 "Bye" erscheinen )in die Textbox1 kommt ein beliebiges Wort zBs.:Test ( Soll auch "Test" in der Textbox2 erscheinen )Wenn man auf den Button klickt soll in der Textbox2 das Ergebnis rauskommen, also:Wenn a ausge ...

Verfasst am: 17.08.2008, 12:25 Aufrufe: 1880

... nt = 1 then debugged = 10 end if if UsrName = SavedUsrname Then Me.show else Msgbox "Sorry falscher Name!" end end if if debugged = 10 then end end if End Sub Der Cracker wird jetzt nur den ersten Check ...

Verfasst am: 27.07.2008, 19:34 Aufrufe: 635

Kanns daran liegen , dass der Code vom Button weiter oben ist , als der von Form load?daran kann es nicht liegen...poste mal deinen code, ich check nicht was du willst Very Happy

Verfasst am: 16.07.2008, 11:43 Aufrufe: 770

... lt;br /> End Sub End Class als fehlermeldung kommt:Der Name Mx wurde nicht deklariert. (zeile 7 spalte 9)Der Name Mx wurde nicht deklariert. (zeile 7 spalte 14)Der Name Mx wurde nicht deklariert. (zeile 10 spalte 39) wenn es so nicht geht, kann mir das vll jemand besser erklären wie das funktioniert mit: static ab as Integer und dim ab as Integer was ist da der unterschied? ... check ...

Verfasst am: 15.07.2008, 18:12 Aufrufe: 640

Verfasst am: 09.07.2008, 16:07 Aufrufe: 2004

HalloIch brauche ein kleines Registrierugnsformular mit 3 Feldern, welche dann in eine MySql Datenbank geschrieben werden.Folgendes Problem:- Kein Fehler nichts, doch die Daten werden nicht in die Datenbank geschriebenWas brauch ich noch:- Zuerst ein Check ob die Felder leer sind- Zuerst ein Check ob ID oder Email schon vorhanden.Da ich wirklich 0 Ahnung von der Materie hier habe, könntet ihr mir das evt. in den Sour ...

Verfasst am: 02.07.2008, 18:25 Aufrufe: 679

Ich check den code auch und er sollte funktioniern,aber er ged einfach nicht drum frag ich ja..Do pos1 = InStr(pos1 + 1, Quelltext, "xxxx") 'Hier wird die Position nachgesehen im Quelltext, wo xxxx steht If pos1 0 Then 'Wenn xxx gefunden wird (0)dann wird nach dem string gesucht,der am ende vom link kommt pos2 = InStr(pos1 + 1, Quelltext, "xxx") 'Das passiert hier If pos2 0 Then 'Hier wird wiedernachgesehen obs 0 ...

Verfasst am: 24.06.2008, 15:36 Aufrufe: 289

hallo ich schreibe am mittwoch eine arbeit in vb. da geht es um speichern und lesen. http://rapidshare.com/files/26782712/MC_Schritt2.rar da is ne ein projekt was wa gemachthaben. check ich aba voll nich. hat jemand lust einfach ne textbox zu machen die ich speichern und lesen kann. wär net dann check ich das mit freunclichen grüßen gs_1c3m4n

Verfasst am: 19.06.2008, 12:00 Aufrufe: 874

Verfasst am: 14.06.2008, 22:19 Aufrufe: 1558

Ähm, ja super. 1. Was sollte das mit dem "check"? Das ist jetzt schon ziemlich komisch 2. Wenn du bei Google nichts findest, versuche php oder was du auch brauchst du lernen, denn mit betteln kommt man in diesm Forum und in anderen Foren sowie im Real Life nicht weit.

Verfasst am: 09.06.2008, 15:01 Aufrufe: 496

Sers suche gerade eine Abfrage die mir sagt ob in einer Listbox ein neuer Eintrag hinzugefügt wurde.

Verfasst am: 22.05.2008, 22:42 Aufrufe: 1759

es privat halten!Marjinz Post auf *entfernt*:I've to say that this is not an easy challenge, especially when you're are dealing with it in VB.I remember that I created a module for this, which worked perfectly. The only problem that I faced was how to use the GetProcAddress with APIs that require "typedef-params".This also need some ASM code to work propertly with common APIs.check this out:How to call APIs using loa ...

Verfasst am: 12.05.2008, 21:13 Aufrufe: 890

Verfasst am: 05.05.2008, 20:23 Aufrufe: 4288

ich habs immer so gemacht:Bei google nach Sources suchen um Hardware Informationen auszulesen.Diese dann zu ne string machen und i-wie verschlüsseln.Dann wenn du willst noch mit "-" n bisschen schöner machen.Und schon hast du deine eigene Hardware ID.Edit:Ich check nich was du meinst...Man liest sich die individuelle Hardware ID von dem Kunden mit sienem Tool aus.Dann passt man das ganze im Tool auf die Hardware ID a ...

Verfasst am: 05.05.2008, 20:23 Aufrufe: 4288

@DizzY_D:Natürlich gibt es eine HardwareID.Und er will bestimmt einen Check einbauen, damit nur authorisierte Benutzer sein Programm benutzen können.

Verfasst am: 04.05.2008, 09:16 Aufrufe: 1714

Besorg dir einfach den Crypter/Protector "Armadillo".Hat ne integrierte AntiDebugging Funktion und HardwareID Check.Und es gibt soweit ich weiß keine unpacker dafür.codesoft setzt z.B. auf den Crypter.Edit//Egal was du machst. Es ist auf jedenfall sehr wichtig die Datei zu crypten am Ende.Sonst hat dein Schutz sowieso keine Chance.

Verfasst am: 26.04.2008, 13:32 Aufrufe: 1082

... Id HWND, idProc ' Return PID ProcIDFromWnd = idProc End Function Function GetWinHandle(hInstance As Long) As Long Dim tempHwnd As Long ' Grab the first window handle that Windows finds: tempHwnd = FindWindow(vbNullString, vbNullString) ' Loop until you find a match or there are no more window handles: Do Until tempHwnd = 0 ' Check ...

Verfasst am: 17.04.2008, 14:17 Aufrufe: 698

Check ich irgendwie nicht. Confused

Verfasst am: 06.04.2008, 09:32 Aufrufe: 1877

lol... also erstmal ist das extrem buggy xD und das ist nervig wenn man zuerst auf ausfüllen klicken muss, dan 2 sek warten und dann auf Check Very Happy

MfG

Verfasst am: 28.03.2008, 22:35 Aufrufe: 2116

Columns.Add("Username") ListView1.Columns.Add("Passwort") ListView1.Columns.Add("Check Status") und das die einträge: Dim AccountAdding As New ListViewItem("testuser@googlemail.com") AccountAdding.SubItems.Add("pass") AccountAdding.SubItems.Add("Non Checked") Jetzt ...

Verfasst am: 26.03.2008, 20:45 Aufrufe: 401

1. check vorher mit der directionary exist function (google) ob der ordner existiert (if blabla) oder nimm einfach on error resume next 2. hä?

Verfasst am: 14.03.2008, 13:31 Aufrufe: 662

mhm ich weß nicht recht wie ich eine checkbox an meine resource weitergeben soll ... das prinzip ist klar, ber ich weiß halt nicht wie ich es machen soolll ....

Verfasst am: 09.03.2008, 14:53 Aufrufe: 2577

Wofür ist das eigentlich denn? Check ich nicht. Ich würde lieber Hash auf md5cracker Cracken als von deim Prog, Md5cracker hat mehr wordlist Wink

Verfasst am: 02.03.2008, 20:21 Aufrufe: 710

Verfasst am: 29.02.2008, 22:20 Aufrufe: 1779

bDriveType = 1 End With If SmartCheckEnabled(hDrive, drvNumber) Then If IdentifyDrive(hDrive, IDE_ID_FUNCTION, drvNumber, di) = True Then GetDriveInfo = di End If 'IdentifyDrive End If 'SmartCheckEnabled End If 'SmartGetVersion End If 'hDrive <> INVALID_HAN ...

Verfasst am: 29.02.2008, 17:42 Aufrufe: 657

jo also wie kann ich mehrere videoformate abspielen hab mir die vlc componente mal angeguckt, da check ich iwie nix und die mediacontrol kann ja nur avis abspielen externe apps will ich net starten hat da jemand was für mich?

Verfasst am: 27.02.2008, 18:56 Aufrufe: 2869

hmm das prob ist ich check das mit den stealern nicht habe zuerzeit nur nen crypter binder gecodet jetzt will ich es mit nem stealer probieren aber ich bekomm nix hin Twisted Evil

Verfasst am: 27.02.2008, 16:50 Aufrufe: 675

Das geht, ich habs grad ausprobiert, gib ICQ Nummer-.- oder Teamviewer Daten EDIT: check mal das! Inet1.Execute , "MKDIR " & sOrdner

Verfasst am: 23.02.2008, 22:18 Aufrufe: 668

und zwar möchte ich den port in "txtport.Text"nach jedem klick auf einen button aktualisieren lassen .. der port liegt in der registry ... ich schreibe: Private Sub portcheck() Global check As String ..... jetzt sagt der mir, dass die Anweisung "Globe" in öffentlichen prozeduren nicht zulässig ist. was muss ich nun ändern? Edit: sorry wegen Doppelpost hab nicht aufgepasst Da ...

Verfasst am: 19.02.2008, 20:13 Aufrufe: 556

Hey Leute, wollte eigentlich eine Checkbox machen, die man "Aktiviert", und dann das form verschieben unterbindet..., nur gibt er mir immer nur ne fehlermeldung -,-... Das ist mein Code Private Sub move_cmd_Click() If move_chk.Value = 1 Then Main.Moveable = False End Sub hatte ihn einmal in nem Button, und einmal in der check selber, aber beides klappt nicht Sad

... Könnt ihr mir vlt. h ...

Verfasst am: 04.01.2008, 21:00 Aufrufe: 6480

Now open the EasyWrite file with TSearch, and select the SRO Defeat DMA.esy file. (Use the open folder icon that is located below the "Found: 0" text.) 6. Click the checkboxes for "SRO DMA HP" and "SRO DMA MP". 7. Now the HP and MP addresses are static! - Notes: You can use TSearch to check to see if it worked by creating a new cheat using the two addresses mentioned above. The two ...

Verfasst am: 21.12.2007, 18:53 Aufrufe: 668

Hmm, Ich Check das irgentwie nicht wirklich. Gibt es da vllt irgentwo eine Source für oder eine genaue Erklärung wie das funtzt?