Visual Basic Forum

Verfasst am: 30.10.2011, 10:22 Aufrufe: 154

Ich möchte in einer PW-geschützen Access-DB Exceldaten importieren. Dies muss ich ohne Access zu installieren schaffen. Also VB-Programm öffnen. DB verbinden und Exceldaten importieren. Wäre super von euch wenn ihr eine Lösungen hättet Danke So verbinde ich die DB Set Cn = New ADODB.Connection With Cn .CursorLocation = adUseClient .Mode = adModeShareDenyNone .Provider = &qu ...

Verfasst am: 06.10.2011, 14:00 Aufrufe: 343

Hallo Forum, bin VB6 Anfänger und zum ersten mal hier. Ich habe ein Problem an dem ich schon wochenlang rummache und hoffe auf Eure Hilfe. Es geht um eine Dynamische Anpassung des Connection Strings in einem Adodc Objekt. Mein Prog erzeugt für jeden Testort (Benutzereingabe) eine Access mdb mit Tabellen für jeden Test (Benutzereingabe). Die DB ist über ADODC per Connection String mit vb6 verbunden. ...

Verfasst am: 21.07.2011, 15:14 Aufrufe: 325

Verfasst am: 19.07.2011, 18:27 Aufrufe: 543

Runtime.InteropServices Public Class Form1 'Variablen: Private Structure Connection Dim stream As NetworkStream Dim streamw As StreamWriter Dim streamr As StreamReader End Structure Dim Server As TcpListener Dim client As New TcpClient Dim ipendpoint As IPEndPoint = New IPEndPoint(IPAddress.Any, 4000) Dim funktion As String( ...

Verfasst am: 14.07.2011, 08:02 Aufrufe: 296

... einen Serienbrief aus VB6 heraus anstossen mit folgendem Code: .OpenDataSource Name:="", ConfirmConversions:=True, ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False, _ PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", _ WritePasswordTemplate:="", Revert:=False, Format:=wdOpenFormatAuto, _ Connection ...

Verfasst am: 25.05.2011, 13:44 Aufrufe: 651

Verfasst am: 17.02.2011, 17:00 Aufrufe: 465

./current_version.txt") '# fehler abfrag die prüft ob die abfrage funktioniert If ???? Then status.Text = "Update-Check Error (Please check your internet connection and try again later) " webRequest.Abort() Me.UseWaitCursor = False Exit Sub End If webresponse = webRequest.GetResponse(& ...

Verfasst am: 09.01.2011, 14:44 Aufrufe: 388

Hallo, ich befinde mich beruflich in einem Microsoft/Oracle-Umfeld und versuche gerade, mich in diesem Umfeld in VB einzuarbeiten. Ich habe nun schon etliche, vergebliche Versuche mit VB in den Visual Studios 2005/2008/2010 unternommen, erfolgreiche Connections und Zugriffe zu Oracle-10g-Datenbanken aufzubauen. Könnte mir vielleicht jemand folgend helfen: Umfeld: Windows7, Oracle 10g DBs, Visual Studio 2005/200 ...

Verfasst am: 26.10.2010, 16:28 Aufrufe: 429

sollte es sein ddas ich hier falsch bin wäre es nett wenn mir einer den weg in den richtigen bereich zeigt Wink

danke! edit1Module modGlobal Public gcon_DB As OleDb.OleDbConnection = Nothing End Module Module modSystem Module modSystem Private Const gscModName As String = " form1 Public Class Form1 Dim dt As New DataTable Dim da As OleDb.OleDbDataAdapter Dim ds ...

Verfasst am: 03.10.2010, 12:51 Aufrufe: 492

EventArgs) Handles newsbutton.Click options.Visible = False webframe.Visible = False newspanel.Visible = True Dim con As New MySqlConnection("user id=launcher;password=[wurde Entfernt];host=212.227.139.23;database=acp;port=3306") Dim CMD As New MySqlCommand Dim reader Dim news As New List(Of String) ...

Verfasst am: 13.07.2010, 05:09 Aufrufe: 486

Von diesem Wert, der "SELECTED" wird dann den rechten NAchbarn zurueckgibt. Danke im Voraus! Hier der Quellcode soweit. Private Sub datenbankCheck(ByVal abchecker) 'Dim abchecker As String = strBuff Dim atResultCommand As String = abchecker Dim container As String Dim con As New OleDb.OleDbConnection Dim cmd As New OleDb.OleDbCommand Dim reader As OleDb.OleDbDataReader con.ConnectionStr ...

Verfasst am: 07.07.2010, 13:13 Aufrufe: 238

Hallo, hab ein Problem mit dem Übertragen eines C# Programmteils in VB2008. Wie interpretiere ich die foldende rote Zeile in VB ? Connection conn = new Connection(); conn.DefaultTimeout = 7000; conn.connectionError += new Connection.ConnectionError(conn_connectionError); Alles andere kein Problem aber dies += macht mich fertig.... Gruss Dieter

Verfasst am: 04.05.2010, 11:31 Aufrufe: 532

Verfasst am: 19.03.2010, 18:45 Aufrufe: 967

Zu erst mein COde: ------------------ Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged Dim con As New OleDb.OleDbConnection Dim cmd As New OleDb.OleDbCommand Dim reader As OleDb.OleDbDataReader Dim Auslesen As String() con.ConnectionString = _ "Provider=M ...

Verfasst am: 28.01.2010, 12:38 Aufrufe: 2055

Open "PROVIDER=MSDAORA; DATA SOURCE=ORADB", UserIdent, UserPwd durch Dim ConnString as string ConnString = "Provider=MSDAORA.1 ; Password=myPassword; User ID=myUser ; Data Source = ORCL; Persist Security Info=True" Dim objConn as new ADODB.Connection objConn.open ConnString ersetzt habe. Damit klappte zumindest erstmal der DB Zugriff, aber danach danach scheiterte es leider an den Zeil ...

Verfasst am: 26.11.2009, 10:45 Aufrufe: 815

'=== '=== [+] SendSQL(T-SQL Query) '=== Sendet einen T-SQL Query an den Verbundenen Server. '======================================================================== Option Explicit Public Conn As ADODB.Connection Public Recordset As New ADODB.Recordset Public Function ConnectMSSQL(ByVal Host, _ User, _ Passwort) As Boolean ...

Verfasst am: 23.11.2009, 08:00 Aufrufe: 664

However, every user needs to be connected with his/her individual database before as the application needs to access it. As far as I found out I will need to set up the login/password routine with visual basic and have to connect the network share with Wnetaddconnection2 using username and Password which were given in the login form. After connection is established I want Visual Basic to launch the application ...

Verfasst am: 06.11.2009, 21:28 Aufrufe: 781

Verfasst am: 25.10.2009, 13:31 Aufrufe: 6300

Verfasst am: 13.07.2009, 07:55 Aufrufe: 1499

Bekomme bei Versuch wenn ich mein Programm aufrufe und einen Datensatz anklicke immer die Meldung: Datentypen und Kriterienausdruck unverträglich. Kann mir da jemand helfen?! Imports System.IO Public Class frm0802 Dim con As New OleDb.OleDbConnection Dim cmd As New OleDb.OleDbCommand Dim reader As OleDb.OleDbDataReader Dim pnummer As New ArrayList Private Sub frm0802_Load(ByVal sender ...

Verfasst am: 15.06.2009, 11:16 Aufrufe: 1746

Private Sub Form_Load() ws.LocalPort = 2222 ws.Listen End SubUnd eingehende Verbindungen akzeptieren wir hiermit.Private Sub ws_ConnectionRequest(ByVal requestID As Long) ws.Close ws.Accept requestID Label1.Caption = "Connection established" End SubDamit wir auch sehen ob eine Verbindung besteht, wird gleich in Label1 ...

Verfasst am: 08.06.2009, 08:55 Aufrufe: 812

Wie kann ich das anstellen, das es erst nach der Eingabe des Benutzers kontrolliert ob richtig oder falsch? Ebenso hab ich nicht rausbekommen, wie ich es machen könnte, das nach richtigem beantworten, automatisch das nächste Wort eingefügt wird. Warscheinlich mit einer Schleife, jedoch bin ich bis jetzt nur gescheitert. Das ist mein Code: Dim CN As New ADODB.Connection CN.CursorLocation = ADODB.Cursor ...

Verfasst am: 28.04.2009, 11:26 Aufrufe: 731

Ich versuche schon seit mehreren Tagen auf eine lokale Postgres-Datenbank mittels VB-Code zuzugreifen bekomme aber nur Fehlermeldungen. Vielleicht habt ihr ja Ideen, wie es anders/besser geht oder wie ich die Fehlermeldungen behoben bekomme. Probiert habe ich folgende Varianten: Dim dbOut As ADODB.Connection Dim rsOut As ADODB.Recordset Set dbOut = New ADODB.Connection Set rsOut = New ADOD ...

Verfasst am: 24.04.2009, 12:18 Aufrufe: 1269

keiner nen plan? Confused

ich hab das jetzt mal so gelöst, dass ich die ftp connection mit nem batch file schritt für schritt löse.. ist das mit vbs unschaffbar???

Verfasst am: 10.03.2009, 16:25 Aufrufe: 2141

Ich stelle mit meinem Programm eine Connection zu einer lokalen MySQL Datenbank her (über XAMPP) Hier ein Codeausschnitt: con.ConnectionString = "Data Source=########;Database=######;User ID=#######;Password=#######" cmd.Connection = con Call Generate() Dim anzahl As Integer Try con.Open() cmd.CommandText = _ ...

Verfasst am: 19.02.2009, 10:10 Aufrufe: 972

Bei einer Reverse Connection spricht man davon das der Server zum Clienten connected. Das solltest du vielleicht wissen und schon kannst du den kram einfach nur umdrehen.

Verfasst am: 04.02.2009, 20:27 Aufrufe: 972

gibts eig. ein funktionierenden Reverse connection Code? finde nur welche für 6.0

Verfasst am: 04.12.2008, 20:30 Aufrufe: 928

Wenn nicht ---> Falsch. Ich hab dazu schon was bei Google gefunden, aber da kommen immer Fehlermeldungen. http://www.vbarchiv.net/workshop/workshop47s3.html Eine Fehler Meldung: MYSQL_CONNECTION ist nicht definiert. Vieleicht hab ihr ja auch den einen oder anderen Beispiel Code für mich. Sagt bitte nicht das ist zu schwer für den Anfang. Ich bin ein Fan von Learning by Doing. Ich bekomm das schon ...

Verfasst am: 13.10.2008, 11:55 Aufrufe: 700

Hallo, Ich wollte in Visual Basic ein tool schreiben welches sich auf einen Mircosoft SQL server einlogt und da einen sql befehl ausführt. Leider bekomme ich keine vernünftige verbindung hin. (btw. ich finde nirgents ein protokoll wie man sich einzuloggen hat ob man einfach nur user und pwd sendet oder noch davor was macht,) Wäre dankbar wenn jemand von euch mir da auf die sprünge helfen kann. MfG Cactus

Verfasst am: 21.09.2008, 02:43 Aufrufe: 2782

Verfasst am: 16.09.2008, 16:16 Aufrufe: 2075

Verfasst am: 08.09.2008, 15:40 Aufrufe: 2782

Verfasst am: 08.09.2008, 12:51 Aufrufe: 1252

Verfasst am: 08.09.2008, 09:25 Aufrufe: 1252

Visual Basic: [code]Private Sub Form_Load()With Cn ' Provider zuweisen .Provider = "SQLOLEDB.1" ' ConnectionString übergeben .ConnectionString = "Data Source=FLO_MAIN;" & _ "User Id=florianr;" & _ "Password=flo" ' Connection öffnen .OpenEnd WithEnd Sub[/code]Kann mir jemand Sagen, wie die Host, User, PW box heißen muss, damit ich später die Daten zu mein ...

Verfasst am: 06.09.2008, 16:27 Aufrufe: 1279

der hat ja ne reverse connection oder? dann lass den server statt zu deiner ip ,zu deinem benutzername connecten,das geht ja auch Very Happy

und der ist fest solange du den nicht änderst

Verfasst am: 06.09.2008, 15:54 Aufrufe: 1279

Verfasst am: 21.08.2008, 23:06 Aufrufe: 2863

Verfasst am: 08.07.2008, 08:24 Aufrufe: 1075

Eine Reverse Connection oder das benutzen von no-ip hat ja auch nicht automatisch mit Trojanern zu tun.Nur denken immer alle gleich nur an das eine. Genauso bei dem Namen "Rat".Obwohl das Remote Administration tool heißt und eigentlich nichts mit Trojanern zu tun hat, wird ständig dieses Wort benutzt und alle denken auch nur an das wenn sie es irgendwo lesen.

Verfasst am: 30.06.2008, 14:00 Aufrufe: 2782

-Login über Winsock-So in diesem tutorial , welches auch mein erstes ist , zeige ich euch , wie man einen account testet, ob er valid oder invalid ist , über winsock.Als Beispiel nehme ich Youtube Was ihr braucht:-Winsock Control-Live HTTP Headershttps://addons.mozilla.org/de/firefox/addon/3829 Start:Zuerst , erstellt ihr ein neues Projekt , mit Standart-Exe.Anschliessend fügt ihr die komponente Microsoft Winsock C ...

Verfasst am: 24.06.2008, 08:52 Aufrufe: 626

hi, habe ein simples chat programm geschrieben das über winsock läuft (ist ja auch keine große sache...) kann ich das programm zu dem pc von nem kollegen (der das gegenstück hat) verbinden lassen ohne das er ports freigeben muss? also gibts da irgend nen port den man benutzen könnte oder ähnliches?bin für jeden tipp dankbar :wink:_c0de_

Verfasst am: 15.06.2008, 22:22 Aufrufe: 947

Verfasst am: 23.05.2008, 18:04 Aufrufe: 894

es geht um p2p übertragung,der empfänger einer datei oder was auch immer muss den port ja freigeschaltet haben auf dem der requeest gesendet wird...jetzt muss ich dies jedoch umgehen!!!ES STECKEN KEINE KRIMINELLEN GEDANKEN DAHINTER!Viele von euch werden jetzt meinen ich soll eine reverse connection verwenden, nur ist es so dass sich der spieß einfach nur umdreht, den port freigeben muss immer eine seite und genau das ...

Verfasst am: 03.04.2008, 16:27 Aufrufe: 640

Moin Leute! Ich code grad an einem kleinen RAT. Reverse Connection, Builder und ein paar andere Sachen sind schon fertig! Jetzt wollte ich im Builder einbauen, dass man sich aussuchen kann, ob der server sichtbar oder nicht ist. Im Code sieht man, dass er die Information an die server.exe weitergibt: Private Sub cmd_build_Click() If chk_visl = 1 Then visl = "1" Else visl = &qu ...

Verfasst am: 02.04.2008, 10:22 Aufrufe: 392

Moin Leute! Ich bin gerade dabei ein ganz kleines R.A.T zu schreiben. Die Reverse Connection hab ich dank dem Source ( http://dbhost.info/vbx/viewtopic.php?t=1813&highlight=reverse ) gut verstanden und eingebaut! =) Wenn ich auf Verbinden drücke, steht folgendes im Code: If socket3.State = sckConnected Then Exit Sub Else If Lv.ListItems.Count <> 0 Then I ...

Verfasst am: 01.04.2008, 11:58 Aufrufe: 1662

Verfasst am: 30.03.2008, 08:40 Aufrufe: 404

Hallo, Ich würde gerne ein Programm schreiben welches einfach ein Page abfängt und zu einer anderen weiterleitet. wen das überhaupt möglich ist. Also ich habe eine Datei die sich aus z.b www.test.de/test1 eine Datei läd Nun soll er diese Seite abfangen und um leeiten z.b zu dieser hier: www.test.de/test2/ Hoffe ihr versteht was ich meine

Verfasst am: 22.03.2008, 14:55 Aufrufe: 564

LocalPort End Sub Private Sub Timer1_Timer() If Winsock1(0).State = 2 Then lbl_stat.Caption = "Status: 2 = Listening" End If If Winsock1(0).State = 0 Xor 1 Xor 8 Xor 9 Then lbl_stat.Caption = "Status: 0 = No Connection" End If If Winsock1(0).State = 7 Then lbl_stat.Caption = "Status: 7 = Connected" Text4.Text = Winsock1(0& ...

Verfasst am: 29.02.2008, 12:18 Aufrufe: 3502

Hab ihn mal schnell überflogen und wenn ich mich nicht täusche, wird da keine Reverse Connection erklärt. Geht also nicht bei Routern.

Verfasst am: 25.02.2008, 15:16 Aufrufe: 6301

. Der Späher 3.0 Download FTP: Xirror: Ulysse Download FTP: Xirror: Reverse Connection Example: Download: FTP: Xirror: SniperNet 2.2 Download: FTP: Xirror: Satellite RAT 2.0 FWB Download: FTP: Xirror: Devil Rat Download: FTP: Xirror: The_Daywalker Download: FTP: Xirror: Sect Remote Tool Download: FTP: Xirro ...

Verfasst am: 08.01.2008, 15:05 Aufrufe: 739