Gateway_man

hi leute, folgendes wollte ich machen, ich habe ein forumlar das zu anfang der anwendung erscheint, dieses soll dann langsam verschwinden und danach soll sich die hauptanwedung gestartet werden. Ich hab das schonmal irgendwo gelesen. Ich muss beispielsweise auf nem Timer die Transparenz stetig erhöhen. Jedoch weiß ich nicht ob das bei einem Form geht da ja die vollständige Transparenz keine Gültige Propertie bei einem Form ist. Falls jemand dazu eine Idee hat, ich bin ganz Ohr mfg und schönen Abend, simon PS als Komponente benutz ich ein splash screen

Verzichtet man bei vista jedoch auf die ganzen visuellen firlefanz läuft dieses auch recht flott

Wohl eher ersteres, denn bei deiner seite gibts fast keine angebote unter 600 $ ;-) und bevor ich soviel ausgebe, würde ich selbst hand anlegen. Allerdings hat der vorposter eine doch sehr interessante Seite erwähnt. Danke euch Simon

hi leute, kennt jemand ne Seite, welche mehr controls für visual studio anbietet? Ich weiß ich selbst ist der Mann ;-) . Würds auch machen, wenns nicht immer so umständlich wäre und so zeitraubend. Wünsch noch nen enspannten Sonntag, Simon

Soso im Frankenland. Sofern du mal in die nähe von neustadt an der aisch kommst (Mittelfranken) dann solltest du unbedingt mal Hofmann Bier probieren. Das Pils von Hofmann ist sehr gut. Privatbrauerei Hofmann Pahres

hi leute, ich hab ein altes backup mit drive image xml auf nem laufwerk liegen, Will aber nicht das ganze image mit betriebssystem laden, sondern will nur an die eigenen Dateien ran da dort wichtige Daten sind. Gibt es da ne möglichkeit nur einsicht in den part des image zu bekommen, welcher die eigenen Dateien beinhaltet? Das image ist auf 36 Binärdaten gesplitet. Wie komme ich nun an meine Daten ohne gleich die komplete partition wiederherzustellen. Danke im vorraus mfg simon

hi leutz, wollt ma fragen was eure lieblingsbiersorten und/oder Weinsorten so sind. Ich mach da mal den Anfang: Mein favorit unter den Deutschen biermarken ist Hoffman Hopfengold und mein favorit unter den import Bieren wäre dann mal Corona (mexicanische Biermarke). Wein finde ich nicht so gut bis auf den Eiswein allerdings ist dieser sehr teuer, da wie der name schon verrät die weinbeeren erst im winter geerntet werden und da ist eben die chance sehr groß das die weinbeeren nicht im richtigen moment geerntet werden und somit für die weitere verarbeitung unbrauchbar sind. mfg simon

Nein das wust ich auch schon, ich meinte damit eher wie die funktion geschrieben wird um aus einem datagridview eine spalte zu selektieren sowie den value aller zellen der spalte zu selektieren . Hat sich aber schon erledigt. Trotzdem danke

hi leute, hab folgendes Problem: Ich habe ein Datagridview das ich mit kontaktadressen fülle. Nun will ich das er mir alle inhalte die in der E-Mail Spalte sind in meine beispielsweise Combobox überträgt. Hatte es bisher so das man die e-mails die man braucht per Doppelklick auf die Zelle überträgt, allerdings ist das bei sagen wir 400 mail extrem lästig. If DataGridView1.CurrentCell.Value.ToString = "" Then Errorfield.Text = "| error you selected an empty cell" ElseIf DataGridView1.CurrentCell.Value.ToString.Contains("@") Then MsgBox(Me.DataGridView1.CurrentCell.Value & " wurde dem Mailverteiler hinzugefügt", MsgBoxStyle.Information) Mailing.ComboBox1.Items.Add(Me.DataGridView1.CurrentCell.Value) 'Mailing.TextBox2.Text = Mailing.TextBox2.Text & Me.DataGridView1.CurrentCell.Value & "," Else Errorfield.Text = "| You can only select email Adresses" End If So ist es momentan. Weiß jetzt aber gar nicht wie ich das wie oben beschrieben machen kann Wäre nice wenn ihr mir da helfen könntet. Mfg Simon

er hätte natürlich auch beim closing event vom hauptform einfach schreiben können form1.dispose() . Wäre zwar unsauber gewesen aber geschossen wäre diese dann.

sagt mal kann man die chips nicht einzeln kaufen? Mfg Simon

Danke bist mei Retter hat geklappt Kannst du mir das jetzt erklären warum muss ich bei der vista 64 bit version beim debuggen auf x86 version umstellen. Und vor allem, welcher zusammenhang besteht zwischen der einstellung und der oldbc Klasse? Bin verwirrt :confused: Danke dir :uli das hätte ich als letztes versucht. Mfg Simon

ja der rechner auf dem die applikation entwickelt wird hat als OS: Windows Vista Ultimate 64 bit Und du meinst es läuft wenn ich beim debuggen x86 einstelle? Ich mein ich will ja auch das se auf meinem rechner läuft zum test.

Wie geht das genau? Kannst du mir das erklären?

habs etz mal zuhause probiert den MDAC zu installieren. Hat nicht geklappt da auf meinem rechner vista läuft :-( gibts da keine möglichkeiten.

Danke funktioniert ;-)

Das hört sich interessant an. Geht das ? einen string von ende nach anfang zu spliten. Ich hab auch schon daran gedacht, aber mir war nicht bewusst wie man den string von ende nach anfang splitet (bzw. ist es mir immer noch nicht bewusst wie) deshalb habe ich diese möglichkeit außer acht gelassen, da man ja unterschiedliche Pfade hat und ich dann ja nicht immer weiß welches element der Dateiname ist (okay man kann natürlich auch sagen das es immer das letzte array element ist). Hättest du evtl n bsp für die oben erwähnte split funktion? Normal wäre es ja wie folgt: Dim test As String = "Gott is des schee heut schon wieder Freitag, aber muss trotzdem noch bis 18 Uhr arbeiten" Dim test2(1) As String test2 = Split(test, ", ") Console.Write(test2(0)) Console.Read() 'Consolenausgabe = Gott is des schee heut schon wieder Freitag hier wäre es ja nicht schwer zu sagen das er mir den teil nach dem komma ausgeben soll einfach 0 mit einer 1 ersetzen. Aber wenn die größe der Felder des arrays zur laufzeit unbekannt sind, dann seh ich da n problem, jedoch wenn du weiß wie man einen string von ende nach anfang spliten kann wäre das auch kein problem mehr wie gesagt würd mich über informationen diesbezüglich freuen.

eben nicht da es ja auf der arbeit geht und ich in der Zeit keine verweise gegeben habe. Hab was gefunden wollt wissen was ihr davon haltet. Das Problem ist ich kanns ja nicht ausprobieren obs das richtige ist weils hier in der Arbeit so oder so geht Welch blanke ironie ! Downloaddetails: MDAC (Microsoft Data Access Components) 2.60.6526.3 - Deutsch Dazu steht: Der weitervertreibbare MDAC 2.6 RTM-Installer installiert die gleichen Datenzugriffs-Kernkomponenten wie Microsoft SQL Server 2000. In dieser Version sind Microsoft Jet, der Microsoft Jet OLE DB-Provider, der ODBC-Desktop-Datenbanktreiber und der Visual FoxPro-ODBC-Treiber nicht enthalten. hier wird aber auch nichts von access gesagt Naja werds mal ausprobieren. Eventuell hab ichs ja a nur überlesen :upps . Danke wie immer fürs gute Feedback. mfg simon

eben nicht auf dem Rechner is ja Acess drauf ich habe die Datenbank auf selbigen rechner erstellt, jedoch hab ichs grad hier auf der Arbeit ausprobiert und es lief ohne probleme. Ich werd mal bei microsoft nach den treibern suchen und werd diese einfach in ein unterverzeichnis meiner anwendung legen und sofern dem jeweiligen rechner diese fehlen einfach nachinstallieren lassen, sollte ja gehn oder ? lg und Danke simon

http://img245.imageshack.us/img245/4569/verbindung.png hier wäre der fehler ich muss zugeben ich hab bisher noch nie ne access Datenpank impementiert. Ich hatte vorher schon ein projekt mit dem ich erfolgreich eine verbindung zu ner sql Datenbank und habe die commands und die adapter sowie die connection einfach auf OleDb umgeschrieben, da mir gesagt wurde, das es im prinzip genauso geht wie bei einer sql Datenbank. Hier ein abfragebeispiel wie ich es mir vorgestellt hatte das es geht : Dim con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _"Data Source=C:\db219.mdb") Dim cmd As New OleDb.OleDbCommand cmd.Connection = con cmd.CommandText = "Select * From Kontakte Where [E-Mail] like '%@%'" Dim ds As New DataSet Dim data1 As New OleDb.OleDbDataAdapter(cmd) data1.Fill(ds) DataGridView1.DataSource = ds.Tables(0) Wäre nett wenn mir hier jemand in etwa sagen könnte was ich falsch gemacht habe beziehungsweise was ich zu beachten habe wenn ich auf eine access Datenbank zugriff haben will. mfg Simon

hat sich erledigt. Noch ein problem hab ich da noch: Dim oldsb As String Dim startuppath As String startuppath = Tri***(My.Application.Info.DirectoryPath.ToString) oldsb = Tri***(OpenFileDialogsb.FileName.ToString) ' MessageBox.Show(oldsb) My.Computer.FileSystem.CopyFile(oldsb, startuppath & "\SBV\") sbrefresh() Das problem liegt darin das ich nur den Zielpfad angeben will und nicht auch noch den Dateinnamen den die zu kopierende Datei dann hat angeben muss. So wie es jetzt ist meldet er mir nen Fehler, da ich als Ziel nur den Pfad angegeben habe " startuppath & "\SBV\") " . So will ich das aber ich meine die Files variieren ja auch und ich will nicht immer einen namen der zu kopierenden Datei für den Zielpfad eingeben müssen. Ich will das der Dateiname gleich bleibt. lg simon

Vorab, welche Programmiersprache? Sofern du das standartdialogform wählst das es in vb gibt, sind da ja auch nur button und dann gehst halt aufs click event und sagst ihm beim A Button Form1.text = "A wurde selektiert" und beim B Button Form1.text = "B wurde selektiert" . Bei beiden noch Form1.show und dann wars das.

exakt das, was ich meinte :-D nur leider konnte die seite es nicht darstellen zumindest nicht in verbindung mit dem "$" Zeichen.

Hier der Quellcode : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click For Each item As String In ComboBox1.Items TextBox2.Text = item Dim mail As New Net.Mail.MailMessage() mail.From = New Net.Mail.MailAddress("Absender") mail.To.Add(TextBox2.Text) mail.Subject = TextBox1.Text mail.Body = RichTextBox1.Text mail.IsBodyHtml = True Try mail.Attachments.Add(New Net.Mail.Attachment(TextBox3.Text)) Catch End Try If copy.Checked = True Then copyevent() End If Dim smtp As New Net.Mail.SmtpClient("SMTP Adresse") smtp.Credentials = New System.Net.NetworkCredential("User", "PW") smtp.Send(mail) mail.Dispose() smtp = Nothing Private Sub copyevent() Dim abc As String Dim def(0) As String Dim copy As String Dim copy2 As String abc = DateTime.Now def = Split(abc, " ") copy = "Copys\" & def(0) & "\" & TextBox2.Text & "\" & TextBox1.Text & ".txt" copy2 = "Copys\" & def(0) & "\" & TextBox2.Text If My.Computer.FileSystem.DirectoryExists(copy2) = True Then Dim copyw As New System.IO.StreamWriter(copy, True, System.Text.Encoding.Default) copyw.Write("Betreff:" & TextBox1.Text & vbCrLf & "Absender: ???" & vbCrLf & "Empfänger: " & TextBox2.Text & vbCrLf & "Anhang: " & TextBox3.Text & vbCrLf & " ------------------------------------------------------------------- " & vbCrLf & "Nachricht: " & vbCrLf & RichTextBox1.Text) copyw.Close() MessageBox.Show("does exist") ' bitte ignorieren dies dient lediglich dafür, damit ich weiß wieweit die schleife durchlaufen wird Else My.Computer.FileSystem.CreateDirectory(copy2) Dim copyw As New System.IO.StreamWriter(copy, True, System.Text.Encoding.Default) copyw.Write("Betreff:" & TextBox1.Text & vbCrLf & "Absender: ???" & vbCrLf & "Empfänger: " & TextBox2.Text & vbCrLf & "Anhang: " & TextBox3.Text & vbCrLf & " ------------------------------------------------------------------- " & vbCrLf & "Nachricht: " & vbCrLf & RichTextBox1.Text) copyw.Close() MessageBox.Show("doesn't exist") ' bitte ignorieren dies dient lediglich dafür, damit ich weiß wieweit die schleife durchlaufen wird End If End Sub Next hat sich jedoch schon erledigt, da es höchst warscheinlich an den Strings in der copyevent() Prozedur liegt war gestern doch schon recht müde . Muss etz erst mal genau schaun da die String doch recht unübersichtlich gehalten sind :confused: . Tri*** benutzt man um bei String die eventuell enstehenden lehrzeichen vor und nach dem String wegzuschneiden. (AFAIK) Wie ich gerade erst gesehn hab wird auch im quellcode die sternchen angezeigt deswegen die frage. Es handelt sich hierbei um Trim $ , natürlich ohne lehrzeichen, nur zeigt mir dann die seite *** an. mfg simon

Sry danke euch für eure schnelle reaktion :-) wusste ich nicht :floet: hoffen wir mal das hier keiner mist anstellt :old Danke euch beiden