words_of_silence

Ein Blick in die MSDN hilft: FileUpload.PostedFile-Eigenschaft (System.Web.UI.WebControls) Sub DisplayFileContents(ByVal file As HttpPostedFile) Dim myStream As System.IO.Stream Dim fileLen As Integer Dim displayString As String Dim loop1 As Integer ' Get the length of the file. fileLen = FileUpload1.PostedFile.ContentLength ' Display the length of the file in a label. LengthLabel.Text = "The length of the file is " _ + fileLen.ToString + " bytes." ' Create a byte array to hold the contents of the file. Dim Input(fileLen) As Byte ' Initialize the stream to read the uploaded file. myStream = FileUpload1.FileContent ' Read the file into the byte array. myStream.Read(Input, 0, fileLen) ' Copy the byte array to a string. For Loop1 = 0 To fileLen - 1 displayString = displayString & Input(loop1).ToString() Next Loop1 ' Display the contents of the file in a ' textbox on the page. ContentsLabel.Text = "The contents of the file as bytes:" Dim ContentsTextBox As New TextBox ContentsTextBox.TextMode = TextBoxMode.MultiLine ContentsTextBox.Height = Unit.Pixel(300) ContentsTextBox.Width = Unit.Pixel(400) ContentsTextBox.Text = displayString ' Add the textbox to the Controls collection ' of the Placeholder control. PlaceHolder1.Controls.Add(ContentsTextBox) End Sub Aufruf: ' Call a helper routine to display the contents ' of the file to upload. DisplayFileContents(FileUpload1.PostedFile) Solltest dann entsprechend den Inhalt / Stream in einer PictureBox ausgeben, anstatt wie im Beispiel einer Textbox. So long, wos

Also, stressen lässt sich wohl kaum jemand gerne. Zudem wundert's mich bei der Problembeschreibung absolut nicht. WOBEI brauchst du denn Hilfe?

Interface B : Inherits A B erbt von A - das heißt, B besitzt foo von A, auch wenn du in der Schnittstelle A.foo durch bar implementierst. Einfach die Vererbung rauslassen Interface B und es sollte gehen.

Denke nicht, dass es eine Alternative gibt, da du zumindest ohne weitere Unterstützung seitens einer AD - API o.Ä. immer auf den Fehler laufen wirst - ist der sog. Teufelskreis. :cool:

Hallo! Warum fängst du den Fehler nicht einfach um die entsprechende Zeile ab? err.Clear On Error Resume Next ... Hier der Zugriff auf die Eigenschaft ... If err.Number <> 0 Then ... irgendwas tun --> beispielsweise das Objekt Nothing setzen oder aus der Funktion aussteigen ... End If Bei Bedarf wieder Error leeren (err.Clear) und Fehlerignorierung abschalten (On Error GoTo 0). Gruß, wos

Sorry, nochmal ich, aber Editierzeit war schon wieder abgelaufen. Hier ein paar alternative Lösungsvorschläge: Entweder eigene Klasse bauen mit entsprechender Tag - Property bauen oder Liste von Images nehmen. Ist zwar alles nicht besonders schön - gerade in Hinblick auf das komfortable Binden von Imagelisten an Controls, aber schöner geht's anscheinend nicht, wenn man auf die Tags nicht verzichten möchte. List<Image> ListeImg = new List<Image>(); Image imgBla= Image.FromFile("C:\\Eigene Dateien\\max_muster.jpg"); imgBla.Tag = "Kekse"; ListeImg .Add(imgBla); (ungetestet) Viel Erfolg und schöne Grüße.

Mhm... Habe es nun in sämtlichen Formen probiert - Objekte von eigenen Klassen reingekippt, Strings übergeben etc... Die Imagelist bzw. das Image - Objekt scheint beim Hinzufügen schlichtweg unter Alzheimer zu leiden. Bug?

Laut diesem Snippet schon. Aber vllt. gibt es ja noch mehr Code in dem Programm, wo mit der Liste gearbeitet wird? Gab schließlich schon einige Fälle, wo Code gepostet wurde und der Fehler eigentlich ganz woanders lag... :schlaf:

Mhhhm... Stimmt. *Kopf kratz* Zudem kann man in die Tag - Eigenschaft sowieso irgendwie alles reinkippen. Dann eine Idee, woran's liegt, dass er quasi beim Hinzufügen zur Liste sein Tag "vergisst"? @ MickeyMiner: Verbirgt sich denn hinter "myList.Images[myList.Images.Count - 1].Tag" wirklich dein myImg oder hat das eventuell einen anderen Index?

Hallo! Meines Achtens verlangt die Tag - Property ein Objekt, du weist der Eigenschaft jedoch ein String zu. Gruß, wos

Hallo! Das Printen macht ihr direkt auf dem Dokument und nicht über das Anzeigecontrol. reportDocument1.PrintOptions --> hier können einige Druckoptionen gesetzt werden (Drucker, Format, Ränder, Seiten etc.) reportDocument1.PrintToPrinter(AnzahlKopien, bSortiert,Startseite, Endseite) Hab's aber nicht ausprobiert. So long, wos

Mhhhm... War wie gesagt auch nur ein Vorschlag. :cool: Und mit der Einstellung "Ich bin FiSi - ich muss sowas nicht können" wirste im Leben nicht weit kommen. Man lernt ja bekanntlich niemals aus.

In .NET ist das recht einfach, wenn du beispielsweise einfach ein vorhandenes Control erweitern oder anpassen möchtest. Dazu erstellst du dir eine Klasse "bla", welche von dem entsprechenden Control erbt. Bsp: (hier wird ein dateTimePicker mit einem DoubleClick - Event ausgestattet): Public Class clsDTPExtended Inherits DateTimePicker Private m_LastClickPosition As Point Private m_LastClickTime As Long Private m_LastClickRaisedDoubleClick As Boolean Public Shadows Event DoubleClick( _ ByVal sender As Object, _ ByVal e As EventArgs _ ) Protected Overrides Sub OnDoubleClick(ByVal e As EventArgs) RaiseEvent DoubleClick(Me, e) End Sub Protected Overrides Sub OnMouseDown(ByVal e As MouseEventArgs) If e.Button = MouseButtons.Left Then If _ Not m_LastClickRaisedDoubleClick AndAlso _ Now.Ticks - m_LastClickTime <= _ SystemInformation.DoubleClickTime * 10000 AndAlso _ IsInDoubleClickArea(m_LastClickPosition, Cursor.Position) _ Then OnDoubleClick(EventArgs.Empty) m_LastClickRaisedDoubleClick = True Else m_LastClickRaisedDoubleClick = False End If m_LastClickPosition = Cursor.Position m_LastClickTime = Now.Ticks End If MyBase.OnMouseDown(e) End Sub Private Function IsInDoubleClickArea( _ ByVal Point1 As Point, _ ByVal Point2 As Point _ ) As Boolean Return _ Math.Abs(Point1.X - Point2.X) <= SystemInformation.DoubleClickSize.Width AndAlso _ Math.Abs(Point1.Y - Point2.Y) <= SystemInformation.DoubleClickSize.Height End Function End Class Im Form kannste dann ganz normal über "New" das Control erzeugen bzw. du ziehst dir dann ein DTP auf das Formular und passt in der Designerdatei die Klasse des Objekts an. Wenn du komplett ein eigenes Control erstellen willst, dann schau dir mal folgendes Tutorial an: Creating Custom .NET Controls with C# | O'Reilly Media So long, wos

Vorschlag: Schreib dafür ein Outlook - Addin, welches einen Button mit entsprechender Funktion zur Verfügung stellt "Erneut versenden Extended". Hier mal ein gutes Tutorial dafür: Creating A COM Add-In In VB6

Ahhhh, ok. Habe 'nen Tutorial gefunden und es klappt. Viel Aufwand für ein wichtiges, kleines Feature, was MS einfach mal vergessen hat. vbCity/DevCity.NET Forums :: .NET :: VB.NET :: FAQ :: Add itemData to Listbox,Combobox Danke für die Hilfe!

Okay, also in der Klasse ComboBoxItem "Inherits Combobox" sagen. Nur genau "also kannst du es der Combobox auch einfach zuweisen" da hapert's. Sorry, stehe irgendwie aufm Schlauch. :confused:

Hallo! Danke für deine schnelle Antwort! "Wenn ich dich richtig verstehe willst du bei einer Auswahl in der combobox gleich das richtige dazugehörige Object haben !?" - Richtig. zu Punkt 1.: Kannst du mir ein wenig mehr dazu sagen? Also Klasse erstellen, ist klar. Nur wie vereine ich dann dieses ComboItem mit meiner Combobox? Muss dieses ComboItem außer der Property "Tag" noch etwas besitzen? zu Punkt 2: Da ich die Objekte bereits in einer Collection halte, wäre das doppelt gemoppelt. Momentan funktioniert es, wenn die Anordnung der Elemente in der Combobox gleich der Anordnung in der Collection ist. Dann kann ich über die Indizes zugreifen. Jedoch wird diese Lösung problematisch, wenn ich die Combobox umsortieren möchte o.ä. So long, wos

Hallo allerseits! Ich hab' da mal folgende Frage: Wie kann ich Objekte einer Klasse an ein Comboboxitem binden? In VB 6.0 gab es da die ImageCombo, wo ich an die Tag - Eigenschaft des Items immer ein Objekt anhängen konnte. Nur dieses Control gibt es leider nicht mehr in .NET und die normale Combobox besitzt leider keine Tag - Eigenschaft auf Item - Ebene. Hat wer einen Vorschlag, wie ich das sonst realisieren könnte? :confused: So long, wos

Hallo KaLu! Mhhhm... Da ich selbst für ein ECM - Softwareunternehmen arbeite , wäre meine Meinung nicht ganz uneingenommen - insofern schau mal hier: ECM-Softwareanbieter D-A-CH Verzeichnis. Da sind sämtliche ECM - Hersteller aufgelistet. Ansonsten google mal ein wenig - es gibt etliche ECM - Produkttests, Empfehlungen, Kritiken, die auch verschiedene Kriterien (Preis, Integration, Performance, Umfang, Schnittstellen, Branchenspezialisierung etc.) berücksichtigen. So long, wos

Jop, das geht. Ist aber sehr aufwendig als "Nebenbei - Projekt". Ich weiß, dass eine Gruppe bei uns damals im Info - Kurs sich "Sudoku" als Semesterprojekt gewählt hatten und ich kann bezeugen, dass es am Ende lief. Es war zwar in Delphi geschrieben, was aber unrelevant ist. Punkt 1: Die Oberfläche, das Feld mit 9x9 Textboxen erzeugen, wo nur Ziffern (1-9) eingetragen werden. Punkt 2 (der Kern): Der Algorithmus!!! In der damaligen Projektgruppe saßen 2 Mathematik - Leistungskurs - Freaks, die den Algorithmus ausgetüftelt haben, ich mir aber sicher, dass man den Algorithmus auch selbst schreiben bzw. die Lösung im Internet finden kann. Als Anhaltspunkt: Sudoku â€â€œ Wikipedia Du musst also vorher im Hintergrund ein fertiges Sudoku per Zufall ermitteln und dann (wenn du verschiedene Schwierigkeitsgrade hast), entsprechend viele Ziffern visible setzen und die Textboxen für Veränderungen sperren. Wenn man "Fertig" bzw. "Überprüfen" klickt, musst du die restlichen Textboxinhalte auf die Werte der richtigen Lösung (am besten 2 - dimensionalen Array) abprüfen. Ich hoffe, dass dir das erste Anhaltspunkte liefert. Toitioi and so long, wos

Mhhhm... Ich bin zwar kein Spezialist, aber warum machst du es nicht mit ADO? :confused: Zudem wäre es interessant, zu wissen, was er bei den fehlerhaften Servern in folgender Schleife tut: ---------------------- 'Query auswerten' 'On Error Resume Next For Each file In oRef bool=1 For Each exclusion in arrExcl If len(exclusion) > 0 then 'logFile.WriteLine(LCase(file.Path)&";"&LCase(exclusion)) If InStr(LCase(file.Path), LCase(exclusion)) > 0 Then bool=0 errorhandling(err) End If End If Next ------------------------ Bist du sicher, dass oRef nicht Nothing ist und er eventuell in einer Endlosschleife o.ä. hängt?! Hatte letztens erst das Problem (allerdings mit ADO), dass ich eine Abfrage gemacht habe und die Ergebnisse in einer Schleife durchgegangen bin. Das Result war leer, und er hing in einer Endlosschleife, da er trotzdem in die Schleife geht durch das Error Resume Next. Ich hoffe, dass dir das ein wenig hilft. So long, wos

Kann den Phase 5 HTML Editor empfehlen --> HTML, CSS, PHP etc. Ist kostenlos und einfach zu bedienen, ohne Schnickschnack. Schau einfach mal bei einer Downloadseite deines Vertrauens. So long, wos

*löl* Was lange währt, wird gut... Nun dank Google habe ich das Problem gelöst! :bimei Lösung für alle, die's interessiert: Der Modi - Viewer besitzt eine Eigenschaft "TextSelection", der man einfach den Rückgabewert der Suche zuweisen muss. Und schwups, ist das Suchwort markiert. Selten, dass eine Zeile Quellcode so glücklich machen kann. Cheers, wos

Hallo allerseits! Ich habe folgendes Problem: Ich möchte in VB 6.0 mit dem Microsoft Office Document Imaging folgendes machen: 1. Ein Bild im Modi - Viewer laden (klappt) 2. Das Bild mit OCR erfassen (klappt) 3. Eine Suche nach bestimmten Wörter durchführen (klappt) 4. Die Treffer im Dokument markieren / highlighten (klappt nicht ) Ich hab' schon die MSDN, Google und die MODI - API konsultiert und habe dazu leider nichts gefunden. Hatte überlegt, da ich die Koordinaten der Treffer habe, jeweils ein Reckteck um die Wörter zu bauen, aber da scheitert irgendwie daran, dass der MODI - Viewer vor dem Rechteck liegt. -.- Für Hilfe, Ratschläge, Kritik - whatever - bin ich sehr dankbar! So long, wos

Hallo! Hochformat: Application.ActiveSheet.PageSetup.Orientation = xlPortrait Application.ActiveSheet.PrintOut Querformat: Application.ActiveSheet.PageSetup.Orientation = xlLandscape Application.ActiveSheet.PrintOut So long, words_of_silence