Gateway_man

Es gibt viele möglichkeiten wie oder wo du etwas speichern kannst. Es bieten sich an XML File, InI File, LST File, etc. Die oben genannten Formate haben eine festdefinierte Struktur für den Inhalt. Demnach müsstest du dir für das entsprechende Format nen kleinen Parser schreiben. (Ausgenommen XML, da das .NET bereits einen solchen Implementiert hat). Du kannst es natürlich auch in einfach in ne txt datei schreiben. Sieht dann in etwa so aus: 'Zum schreiben Dim wr As New IO.StreamWriter(FilePfad, False) wr.Write(Text) wr.Flush() wr.Close() 'Zum lesen Dim content As String = String.Empty Dim re As New IO.StreamReader(FilePfad) content = re.ReadToEnd() re.Close() .:Edit:. Hatte zuspät gerafft was du genau meinst . Das was du willst nennt sich AutoComplete und ist eine Property des Textbox Controls. klick mich oder mich

Das war nur zu Testzwecken.... Meines erachtens ist das ein Sauberer Code... Man hätte natürlich noch per Region n bisschen Gliedern können aber naja.

Hallo, folgende Problematik: Eigentlich ist es ein realtiv einfaches konstrukt. Ich rufe eine Klasse auf die mir alle momentan verfügbaren Drucker abruft und deren aktuelle Konfigurationen zurückgibt. Dann lasse ich die Papiergröße berechnen um diese dann mit einer anderen errechneten Größe zu vergleichen. Sieht in etwa so aus: Imports System.Data.SqlClient Imports System.Data Imports Microsoft.Office.Interop.Excel Public Class Form1 Private WithEvents pr As New printers Dim list As List(Of printers._PrinterSettings) Delegate Sub change() Private sql As New SqlConnection(ConnectionString) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dialog1.ComboBox1.Items.Clear() For i As Integer = 0 To list.Count - 1 Dialog1.ComboBox1.Items.Add(list(i).DeviceName) Next If Dialog1.ShowDialog = System.Windows.Forms.DialogResult.OK Then Dim cprinter As printers._PrinterSettings = list(Dialog1.ComboBox1.SelectedIndex) Dim ada As New SqlDataAdapter("exec GetAllData 1", sql) Dim dt As New Data.DataTable ada.Fill(dt) Dim app As New Application Dim wb As Workbook = app.Workbooks.Add() If wb.Worksheets.Count > 1 Then Dim count As Integer = 0 For i1 As Integer = 2 To wb.Worksheets.Count wb.Worksheets(i1 - count).Delete() count += 1 Next End If Dim ws As Worksheet = wb.Worksheets(1) ws.PageSetup.PaperSize = cprinter.PaperSize Dim counter As Integer = 0 Dim cHeight As Double = 0.0 For i As Integer = 0 To dt.Rows.Count - 1 counter += 1 ''Es handelt sich hierbei um die untenstehende If Verzweigung If cHeight <= cprinter.Size.Height Then For i1 As Integer = 0 To dt.Columns.Count - 1 Dim lrange As Range = ws.Cells(counter, 1 + i1) lrange.Value = dt.Rows(i)(i1) Next Dim lcache As Range = ws.Range(ws.Cells(1, 1), ws.Cells(counter, 1)) cHeight = lcache.Height Else Dim lrange As Range = ws.Cells(counter, 1) lrange.Value = "LastPiece" ws = wb.Worksheets.Add(System.Reflection.Missing.Value, ws) ws.PageSetup.PaperSize = cprinter.PaperSize counter = 0 cHeight = 0 End If Next wb.SaveAs("C:\reaven.xls") wb.Close() app.Quit() End If End Sub Private Sub pr_End_GetPrinter(ByVal obj As Object, ByVal e As System.EventArgs) Handles pr.End_GetPrinter list = pr.PrinterList Dim ole As New change(AddressOf Lock_Change) Me.Invoke(ole) End Sub Public Sub Lock_Change() Button1.Enabled = True End Sub End Class Aufgrund des sehr mysteriösen Ergebnis hatte ich dann die Überwachungen für die Variablen cHeight und cprinter.Size.Height eingefügt um beim debuggen deren Wert sehen zu können. Das Ergebnis hatte mich verwirrt, da die Bedingung (cHeight <= cprinter.Size.Height) nicht erfüllt wurde und dennoch in den Block geswitcht wurde und nicht in den Else Block. Sprich cHeight war bereits Größer als cprinter.Size.Height und dennoch wurde der Ausdruck True. Ich versteh die Welt nichtmehr.... Hatte eventuell jemand schonmal ein ähnliches Phänomen oder einen guten Rat? lg Gateway .:Edit:. Hat sich schon erledigt. Kann gelöscht werden ......

Hi, folgendes Problem: Ich habe Texte die mit RTF Formatiert sind. Da ich die Formatierung in Excel gerne beibehalten würde habe ich ein paar testreihen gestartet. Erster Simpler Test: Mit Word ein RTF Dokument erstellt. Dann den formatierten Text mit STRG + C in die Zwischenablage kopiert. Dananch ein Excel Sheet geöffnet, eine Zelle selektiert und dann eingefügt. Das Ergebnis: Die Formatierung blieb erhalten. Dann hatte ich versucht das im Programm umzusetzten: Sprich den Inhalt des RTF Dokuments in die Zwischenablage kopiert und dann das Excel Sheet geöffnet und versucht per Worksheet.Paste den Inhalt einzufügen: RTF Text: rtf.Rtf = "{\rtf1\ansi\ansicpg1252\uc1\deff0\stshfdbch0\stshfloch0\stshfhich0\stshfbi0\deflang1031\deflangfe1031{\fonttbl{\f0\froman\fcharset0\fprq2{\*\panose 02020603050405020304}Times New Roman;}{\f44\fswiss\fcharset0\fprq2{\*\panose 020b0806030902050204}Impact;}" _ & "{\f124\froman\fcharset238\fprq2 Times New Roman CE;}{\f125\froman\fcharset204\fprq2 Times New Roman Cyr;}{\f127\froman\fcharset161\fprq2 Times New Roman Greek;}{\f128\froman\fcharset162\fprq2 Times New Roman Tur;}" & _ "{\f129\froman\fcharset177\fprq2 Times New Roman (Hebrew);}{\f130\froman\fcharset178\fprq2 Times New Roman (Arabic);}{\f131\froman\fcharset186\fprq2 Times New Roman Baltic;}{\f132\froman\fcharset163\fprq2 Times New Roman (Vietnamese);}" & _ "{\f564\fswiss\fcharset238\fprq2 Impact CE;}{\f565\fswiss\fcharset204\fprq2 Impact Cyr;}{\f567\fswiss\fcharset161\fprq2 Impact Greek;}{\f568\fswiss\fcharset162\fprq2 Impact Tur;}{\f571\fswiss\fcharset186\fprq2 Impact Baltic;}}{\colortbl;\red0\green0\blue0;" & _ "\red0\green0\blue255;\red0\green255\blue255;\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;" & _ "\red128\green0\blue0;\red128\green128\blue0;\red128\green128\blue128;\red192\green192\blue192;}{\stylesheet{\ql \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fs24\lang1031\langfe1031\cgrid\langnp1031\langfenp1031 \snext0 Normal;}" & _ "{\*\cs10 \additive \ssemihidden Default Paragraph Font;}{\*" & _ "\ts11\tsrowd\trftsWidthB3\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3\trcbpat1\trcfpat1\tscellwidthfts0\tsvertalt\tsbrdrt\tsbrdrl\tsbrdrb\tsbrdrr\tsbrdrdgl\tsbrdrdgr\tsbrdrh\tsbrdrv" & _ "\ql \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fs20\lang1024\langfe1024\cgrid\langnp1024\langfenp1024 \snext11 \ssemihidden Normal Table;}}{\*\latentstyles\lsdstimax156\lsdlockeddef0}{\*\rsidtbl \rsid657347\rsid864002}" & _ "{\*\generator Microsoft Word 11.0.5604;}{\info{\author 1K146}{\operator 1K146}{\creatim\yr2010\mo7\dy27\hr9\min16}{\revtim\yr2010\mo7\dy27\hr9\min17}{\version2}{\edmins0}{\nofpages1}{\nofwords2}{\nofchars15}{\nofcharsws16}{\vern24689}}" & _ "\paperw11906\paperh16838\margl1417\margr1417\margt1417\margb1134 \deftab708\widowctrl\ftnbj\aenddoc\hyphhotz425\noxlattoyen\expshrtn\noultrlspc\dntblnsbdb\nospaceforul\formshade\horzdoc\dgmargin\dghspace180\dgvspace180\dghorigin1417\dgvorigin1417\dghshow1" & _ "\dgvshow1\jexpand\viewkind1\viewscale100\pgbrdrhead\pgbrdrfoot\splytwnine\ftnlytwnine\htmautsp\nolnhtadjtbl\useltbaln\alntblind\lytcalctblwd\lyttblrtgr\lnbrkrule\nobrkwrptbl\snaptogridincell\allowfieldendsel\wrppunct" & _ "\asianbrkrule\rsidroot864002\newtblstyruls\nogrowautofit \fet0\sectd \linex0\headery708\footery708\colsx708\endnhere\sectlinegrid360\sectdefaultcl\sftnbj {\*\pnseclvl1\pnucrm\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl2" & _ "\pnucltr\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl3\pndec\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl4\pnlcltr\pnstart1\pnindent720\pnhang {\pntxta )}}{\*\pnseclvl5\pndec\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl6" & _ "\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl7\pnlcrm\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl8\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl9\pnlcrm\pnstart1\pnindent720\pnhang" & _ "{\pntxtb (}{\pntxta )}}\pard\plain \ql \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fs24\lang1031\langfe1031\cgrid\langnp1031\langfenp1031 {\i\insrsid657347\charrsid657347 Das}{\insrsid657347 }{\ul\insrsid657347\charrsid657347 " & _ "ist}{\insrsid657347 }{\f44\insrsid657347\charrsid657347 ein}{\insrsid657347 }{\b\insrsid657347\charrsid657347 test der wirklich cool ist!}{\insrsid864002 " & _ "\par }}" Clipboard.SetText(rtf.Rtf, TextDataFormat.Rtf) Dim app As New Application Dim wb As Workbook = app.Workbooks.Open("C:\test123.xls") Dim ws As Worksheet = wb.Worksheets(1) ws.Paste(ws.Cells(3, 3)) wb.Save() wb.Close() app.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(app) Dummerweise wirft der Compiler bei ws.Paste folgenden Fehler: Genauer: Zunächst habe ich dann noch einen anderen Versuch gestartet. Ich hab das RTF Dokument wieder mit Word geöffnet, dann den formatierten Text Selektiert und wieder mit STRG + C in die Zwischenablage kopiert. Dann hatte ich nurnoch den Paste Befehl ausgeführt: Dim app As New Application Dim wb As Workbook = app.Workbooks.Open("C:\test123.xls") Dim ws As Worksheet = wb.Worksheets(1) ws.Paste(ws.Cells(3, 3)) wb.Save() wb.Close() app.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(app) Das funktionierte auch. Der Text samt Formatierung wurde in Excel übernommen. Da es aber nicht praktikabel ist den Text aus der Datenbank zu holen, diesen nach Word zu exportieren und dann Manuell zu selektieren und zu kopieren frage ich euch nun was ich eventuell falsch gemacht haben könnte? Und ob einer von euch eine Idee hat, wie ich einen mit rft Formatierten Text nach Excel exportieren kann. lg Gateway

Ganz einfach in dem du auf den Rückgabewert achtest. Dieser Rückgabewert (nebenbei vom Typ Boolean) sagt aus ob das parsen geklappt hat oder nicht....

mach doch mal eine Fehlerspezifischere Fehlerbehandlung und lass dir dann nochmal die Exeption und die InnerExeption ausgeben: try { ...Code } catch (System.Net.Mail.SmtpException ex) { Ausgabe der Exeption } Allerdings hab ich ja stark die Vermutung das was bei deinem Privatrechner nicht stimmt. (Konfigurationstechnisch) Denn wie gesagt das oben gepostete script funktioniert bei mir einwandfrei... (Natürlich must du die logindaten sowie den Empfänger anpassen) lg Gateway Edit: Was verstehst du unter klinkt sich einfach aus?

warum lässt das das nicht über den Inhalt der Zeile suchen? Sry wenn ich jetzt nicht ganz den Nagel treffe allerdings klingt die Frage für mich nicht ganz dienlich oder ich verstehe Sie falsch....

Also ich hab mir grad selbst was geschrieben zum test und ich seh da kein Problem. Ich konnte die nachricht versenden und bekam diese auch.... Dim client As New SmtpClient("mail.gmx.net", 25) Dim mail As New MailMessage("hans@gmx.de", "mu@hopfen.de") mail.Body = "Das ist ein test" mail.Subject = "Test" client.Credentials = New Net.NetworkCredential("hans@gmx.de", "12345") client.Send(mail) In C Sharp: SmtpClient client = new SmtpClient("mail.gmx.net", 25); MailMessage mail = new MailMessage("hans@gmx.de", "mu@hopfen.de"); mail.Body = "Das ist ein test"; mail.Subject = "Test"; client.Credentials = new Net.NetworkCredential("hans@gmx.de", "12345"); client.Send(mail); lg Gateway

Sry vorab für Doppelpost. Hatte gerade nachgesehn und es scheint doch pflicht zu sein. (Zumindest für die IHK München)

Ich war der Meinung das das Berichtsheft so nur bei der Abschlussprüfung mitzubringen ist. Bilde mir ein das der Lehrer was diesbezüglich sagte.

Also für FreeUser war es meiner Meinung nach nicht verfügbar... Ich glaube was du meinst ist der Login. Ja beim Login werden scheinbar die Daten per ssl verschlüsselt. Aber nicht der Mailtransfer. Ich habe vor geraumer Zeit nen E-Mail Client geschrieben (SMTP, IMAP, POP3). Und ich bin mir sicher das ich es speziell bei gmx ohne SSL gemacht habe, da es mit bei kostenlosen Accounts (gibt ja noch die Premium Mitgliedschaft) nicht ging. Und das Programm nutze ich täglich um Mails zu senden und zu empfangen ...... =gmx]klick mich lg Gateway

@ TE Wenn du die Property SSL auf True setzt muss das der SMTP Server unterstützten. GMX unterstützt dieses nicht. Zudem muss bei Port der Port angegeben werden auf dem der Ziel SMTP Server läuft (Standart bei unverschlüsselten Verbindungen 25): link 1 link 2 lg Gateway

Ich würd mich mal auf der Seite des Hersteller schlau machen. Es gibt scheinbar ein SDK: klick mich.

Und er wollte dich nur daraufhinweisen das man den Code zwecks Wartung von beispielsweise Kollegen (welchen diesen nicht verfasst haben) wesentlich verständlicher hätte schreiben können...... Sonst ist es ja nicht schlecht, zumal die Formal ja nicht an eine Programmiersprache gebunden ist....

Guten Tag, ich bekam vor geraumer Zeit folgendes Projekt zugeteilt: Projekttitel: Berichtgenerator Erstellen Sie eine Allgemeingültige Klasse, welche Excel Vorlagen mit Daten aus einer MSSQL Datenbank füllt (Die Positionierung wird durch Vorlagengruppen abhängige Bookmarks gesetzt). Auf einige Konstrukte muss der User Einfluss nehmen können. Beispielsweise wenn es sich um einen Tabelle handelt (sprich handelt es sich nur um eine Aufzählung oder um Rechnungsposten). Das ganze muss wirklich so Allgemein gehalten werden wie nur möglich. Zur Problematik: Problem 1: Sobald man meine bereits existierende Klasse Instanziert werden aus Zeitkritischen gründen mehrere Aufgaben in meherern Threads abgearbeiten. Vor allem anderen wird per WMI die momentanen Konfigurationen aller registrierten und auffindbaren Drucker abgerufen. Ist das getan, wird dem User ein Dialog gezeigt, wo dieser den für die aktuelle selektierte Vorlage zu nutzenden Durcker auswählt. Das überprüfen der Drucker dauert auf dem Entwicklerrechner satte 5 Sekunden (Bei 5 Verfügbaren Druckern). Definitiv zu lange. Kennt jemand einen schnelleren Weg als den meinen. Ich gehe über die PrinterConfigurations der WMI. Problem 2: Da der Drucker Variable sein soll muss ich auch davon ausgehn, dass das momentan eingestellte Blattformat unterschiedlich ist. Diese Information ist für mich nicht ganz unerheblich, da ich mich ja auch um die Seitenumbrüche in Excel kümmern muss. Wegen möglichen Bereichen, die sich auf jeder Seite am Anfang wiederholen sollen. Mein Gedanke war: Da ich die momentane eingestellte größe des Papiers des für die Aufgabe selektierten Drucker bereits habe, wollte ich zwei Schleifen starten. Die eine Arbeitet die zurückgegeben Rows der Datenbank ab, die andere vergleicht die momentan erreichte höhe mit der Maximalhöhe des Papiers (in zehntel mm). Jedoch gestaltet sich das als etwas größeres Problem, da mir Excel per Rangeobjekt eine Größeneinheit zurückliefert die ich nicht kenne. In der MSDN steht leider auch nicht welche Einheit die Funktion [range].Cells.ColumnWidth zurückgibt. Ich habe nur von einer sehr obskure Größeneinheit gehört. Siehe Hier. Demnach würde sich die Spaltenbreite nach der Standartschriftgröße Orientieren?! Wenn das jemand wüsste wäre mir sehr geholfen. Lg Gateway

hat sich erledigt

Ich reih mich mal mit ein. Habe selbiges Problem und bisher noch keinen Lösungsweg gefunden. Ich habe den Verdacht das es an einer Propertie vom jeweiligen Control liegt welche falsch gesetzt ist. Es handelt sich bei mir um ein DatagridviewControl. Das wäre dann mal der schöne Fehler in langform: Sofern jemand eine Idee hat, ich bin für alles Offen :beagolisc . lg Gateway PS: Hier noch der Text der Inner Exception:

Kann geclosed werden....

Hallo, ich bin leider nich so fit was Oracle angeht. Und wollte fragen ob mir jemand beim Umwandel von folgendem Statement helfen kann. Oracle Statement: is x integer; begin for xrec in (select * from tabelle1) loop select count(*) into x from tabelle2 o where o.Name = xrec.Name AND o.KNTNR = xrec.KNTNR; if x > 0 then update tabelle2 o set o.Name = xrec.Name, o.KNTNR = xrec.KNTNR where o.Name = xrec.Name AND o.KNTNR = xrec.KNTNR; else insert into Tabelle2 select * from Tabelle1 o where o.Name = xrec.Name AND o.KNTNR = xrec.KNTNR; end if; end loop; end; das sollte dann in MSSQL als Stored Procedure gespeichert werden: CREATE PROCEDURE test AS declare @x int BEGIN For ????? END Ich steh hier grad voll auf dem Schlauch. Wenn mir jemand helfen könnte würde ich mich super freuen . Lg Gateway

Deine Aussage rechtfertigt keine Straftat....... Wir leben ja glücklicherweise in keiner Anarchie, wo du machen darfst was dir gefällt . Zumal er nichts desto trotz spätestens Probleme bei der Online Registrierung bekommen würde (ASAIK).

Du scheint dich scheinbar noch nicht alzusehr mit dem printen im .NET Framework auseinander gesetzt zu haben. Die Lösung, welche du dem TE gepostet hast ist nicht die beste. Warum? Du selbst kümmerst dich nicht um das printen und kannst somit nur den Content übergeben, jedoch nicht dessen Formatierung oder Positionierung beeinflussen. Wenn man aber im .NET selbst einen Druckauftrag erstellen möchte, nutzt man am besten das bereits erwähnte PrintDocument. Verglichen deiner Lösung ist es jedoch bei weitem nicht so einfach, da man den Inhalt der zu drucken Seite selbst Positionieren und Zeichnen lassen muss. (Das geschieht mit dem ebenfalls bereits erwähnten System.Drawing Namespace). Hier ein kleines Beispiel aus der MSDN: using System; using System.IO; using System.Drawing; using System.Drawing.Printing; using System.Windows.Forms; public class PrintingExample { private Font printFont; private StreamReader streamToPrint; static string filePath; public PrintingExample() { Printing(); } // The PrintPage event is raised for each page to be printed. private void pd_PrintPage(object sender, PrintPageEventArgs ev) { float linesPerPage = 0; float yPos = 0; int count = 0; float leftMargin = ev.MarginBounds.Left; float topMargin = ev.MarginBounds.Top; String line=null; // Calculate the number of lines per page. linesPerPage = ev.MarginBounds.Height / printFont.GetHeight(ev.Graphics) ; // Iterate over the file, printing each line. while (count < linesPerPage && ((line=streamToPrint.ReadLine()) != null)) { yPos = topMargin + (count * printFont.GetHeight(ev.Graphics)); ev.Graphics.DrawString (line, printFont, Brushes.Black, leftMargin, yPos, new StringFormat()); count++; } // If more lines exist, print another page. if (line != null) ev.HasMorePages = true; else ev.HasMorePages = false; } // Print the file. public void Printing() { try { streamToPrint = new StreamReader (filePath); try { printFont = new Font("Arial", 10); PrintDocument pd = new PrintDocument(); pd.PrintPage += new PrintPageEventHandler(pd_PrintPage); // Print the document. [B]pd.Print();[/B] //Wie du siehst wird hier der Printbefehl ausgeführt. } finally { streamToPrint.Close() ; } } catch(Exception ex) { MessageBox.Show(ex.Message); } } // This is the main entry point for the application. public static void Main(string[] args) { string sampleName = Environment.GetCommandLineArgs()[0]; if(args.Length != 1) { Console.WriteLine("Usage: " + sampleName +" <file path>"); return; } filePath = args[0]; new PrintingExample(); } } lg Gateway

Ganz einfach, weil der MySQL Connector, welchen du installiert hast, nichts weiter ist als ein ODBC Treiber. Dieser beschreibt die jeweiligen Zugriffsverfahren, etc. auf das DBMS. Wenn du wissen willst, welche ODBC Treiber bereits auf deinem Rechner installiert sind, kannst du das unter: Systemsteuerung -> Verwaltung -> Datenquellen(ODBC) Und dann auf die Registerkarte Treiber. Lg Gateway PS: Es gibt viele ODBC Treiber für alle möglichen Datentypen (bsp. *.csv, etc.) sowie DBMS , welche dem Entwickler Zugriffe und Abfragen wesentlich erleichtern.

Naja ne Datenbank nur lokal laufen zu lassen ist evtl für Testzwecke nützlich, aber in der Regel nutzt man ja so ein Konstrukt um von überall aus Daten abrufen zu können. Was aufjedenfall empfehlenswert ist, sofern du die SQL Instanz übers öffentliche Netz laufen lassen willst: --> Ändern des Listener Ports (Standart ist gefährlich (ist ja Public)) --> Standartuser löschen (bei mysql wäre das AFAIK root) Zu den Verbindungsproblemen: Wenn du per C Sharp drauf zugreifen möchstest, empfehle ich dir das über ODBC abzuwickeln. Treiber gibts hier ! Und das wäre dann der Connectionstring in C Sharp und als beispiel ein simpler Select Befehl: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.Data.Odbc; namespace WindowsFormsApplication1 { public partial class Form1 : Form { private OdbcConnection con = new OdbcConnection("Server=myServerAddress(IP);Database=myDataBase(DBName);Uid=myUsername;Pwd=myPassword;"); public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { OdbcCommand cmd = new OdbcCommand(); cmd.Connection = con; cmd.CommandText = "SELECT * From [Table]"; DataTable dt = new DataTable(); OdbcDataAdapter ada = new OdbcDataAdapter(cmd); ada.Fill(dt); } } } Lg Gateway

hallo, folgendes Problem: Ich habe per paint Event eines Panels ein Rectangle zeichnen lassen. Dieses Rectangle wird mit einem LinearGradientBrush gefüllt. Wenn ich nun das Programm starte, und ein beliebiges anderes Fenster nehme und über die Oberfläche des Programm ziehe dann schädige ich damit dem LinearGradientBrush. Sprich er wird "gelöscht". Siehe Anhang. Ich hoffe ihr versteht was ich meine und könnt mir helfen. lg Gateway

Guten Tag, bei der Syntax Verständnisfrage handelt es sich um folgende Zeilen Code: C# supportInitialize.Initialized -= New EventHandler(DataSource_Initialized) VB.NET RemoveHandler supportInitialize.Initialized, AddressOf DataSource_Initialized Und zum hinzufügen eines EventHandler: C# supportInitialize.Initialized += New EventHandler(DataSource_Initialized) VB.NET AddHandler supportInitialize.Initialized, AddressOf DataSource_Initialized Sind die C# Zeilen richtig in vb.net übersetzt oder hab ich da einen Kapitalen Fehler gemacht. Was mich einfach verwirrt ist die Tatsache, das bei der C # Variante bei der Zweisung des EventHandlers += genutzt wird. Korrigiert mich wenn ich was Falsch verstanden habe. Lg und vielen Dank Gatway