Majestix

Hi, ich breuchte bei einem Schulprojekt hilfe. Und zwar geht es darum das in C++ eine druck version eingefügt werden soll. Als Compiler steht uns Borland Professional v5.0 zur verfügung. Bisher habe ich gelesen das folgende funktionen: EnumPrinters() PrinterProperties() ClosePrinter() StartDoc() StartPage() EndDoc() EndPage() http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdi/prntspol_9fjn.asp hilfreich sein könnten. Aber ich versteh in keinster weise wie ich die anwenden kann. Eigentlich möchte ich nur wissen wir ein ganz einfacher Druckerdialog aufgehen kann, und was noch wichtig wäre das ich einen Drucker festlegen kann der automatisch genommen wird. danke vorab!!

sound geht wieder ! nach erneutem einbau der C-Media karte, ( nachdem onboard karte in geräte manager deaktiviert ist ) und aufspielen des treiber 6.39 (c-media hp), hin und herstecken der kabel hab ich directX neu installiert und jetzt geht alles bestens ! danke für die hilfe!

mitlerweile habe ich wieder die c-media drinnen und treiber installiert! ich höre sound im media player sonst nirgends ! direct sound test: ( gerät wird oben erkant treiber auch usw.. ) direkt beim ersten sound ob ich ihn gehört haben -> nein anmerkung: DirectSound-Testergebnisse: Abbruch in 19 (Benutzerüberprüfung der Software): HRESULT = 0x00000000 (Fehlercode) direct music test-> sound kommt beim testen wenn microsoft->syntesizer ausgewählt ist

wie gesagt, richtige treiber für das mainboard hab ich schon von der gigabyte seite.. mit directX werde ich heut abend testen. die mainboard sollte richtig gejumped sein, da es ja bereits vor der formatierung schon funktioniert hat , und ich nix verändert habe..

hmm , ich hab nur leider mitlerweile gar keinen sound mehr und bekomm es auch nicht mehr hin.. ( wo bekommt man neues directX her ?)

Tach Leute, hab schon die Suchenfunktion im Forum besucht aber nix gefunden. Ich hab folgendes Problem: Ich hab vorgestern format C: gemacht und WIN XP SP2 neu installiert... jetzt hab ich leider keinen sound mehr. zum einen hab ich eine onboard soundkarte ( SB ) auf nem GIGABYTE Board laut BIOS so nen AC 97 ding.. und zum andern eine CMI8738 6CH/4CH von C-Media. XP hat nun nach der Neuinstallation die Onboard karte gefunden und installiert, das ding wird korrekt im geräte manager angezeigt, aber es funktioniert nicht, aus den boxen kommt nicht raus. (ja die sind richtig angeschlossen und haben strom.. ) habe auch bereits schon neuen treiber draugehauen der nicht geht. das andere problem ist die CMI8738 6CH/4CH die kann windows nicht installieren, also habe ich mir von der c-media seite den treiber 6.39 gezogen und installiert. ich hatte dann seltsamer weise im media player ton, aber alle andere dinge wie spiele usw. hatten keinen sound. hab auch dei games neuinstalliert usw. hat keinen effekt gehabt.. dann hab ich heut den rechner wieder eingeschalten, jetzt habe ich gar keinen ton mehr ! wenn ich dei CMI8738 6CH/4CH deaktiveren und nur die onboard karte laufen lasse hängt sich der pc auf.. und im bios kann ich sie zwar deaktivieren aber windows findet sie trotzdem immer wieder als hardware ?! ich hab also schon einiges probiert, aber irgendwie geht das nicht.. hab schon beides im geräte manager aktiviert und jeweils eins deaktiviert.. kein erfolg weiß jmd. hilfe ? danke im voraus ! Hab gestern noch die C-Media karte ausgebaut und gelöscht, und für die onboard die neusten gigabyte treiber installiert.. kein erfolg ( keiner fehler im geräte manager ) EVEREST Hradware angaben: Computer: Computertyp Standard-PC Betriebssystem Microsoft Windows XP Professional OS Service Pack [ TRIAL VERSION ] Internet Explorer 6.0.2900.2180 (IE 6.0 SP2) DirectX 4.09.00.0904 (DirectX 9.0c) Computername OWNER Benutzername Blaaa Domainanmeldung [ TRIAL VERSION ] Datum / Uhrzeit 2006-02-13 / 20:42 Motherboard: CPU Typ AMD Athlon, 900 MHz (9 x 100) Motherboard Name Gigabyte GA-7ZX(-1) Motherboard Chipsatz VIA VT8363(A) Apollo KT133(A) Arbeitsspeicher [ TRIAL VERSION ] BIOS Typ AMI (07/17/00) Anschlüsse (COM und LPT) Kommunikationsanschluss (COM1) Anschlüsse (COM und LPT) Kommunikationsanschluss (COM2) Anschlüsse (COM und LPT) ECP-Druckeranschluss (LPT1) Anzeige: Grafikkarte NVIDIA GeForce4 Ti 4400 (128 MB) 3D-Beschleuniger nVIDIA GeForce4 Ti 4400 Multimedia: Soundkarte C-Media CMI8738/C3DX Audio Device Soundkarte Ensoniq ES1371 (Gigabyte) Datenträger: IDE Controller VIA Bus Master IDE Controller SCSI/RAID Controller LSI Logic 53C875/53C876-Gerät Floppy-Laufwerk Diskettenlaufwerk Festplatte IBM DNES-309170W SCSI Disk Device (9 GB, 7200 RPM) Festplatte WDC AC28400R (7 GB, IDE) Optisches Laufwerk HITACHI DVD-ROM GD-7500 (12x/40x DVD-ROM) Optisches Laufwerk MITSUMI CR-4804TE (4x/4x/24x CD-RW) S.M.A.R.T. Festplatten-Status OK Partitionen: C: (FAT32) [ TRIAL VERSION ] D: (FAT32) 8008 MB (398 MB frei) Speicherkapazität [ TRIAL VERSION ] Eingabegeräte: Tastatur Erweiterte PC/AT-PS/2-Tastatur (101/102 Tasten) Maus Logitech iFeel Mouse (USB) Netzwerk: Primäre IP-Adresse [ TRIAL VERSION ] Primäre MAC-Adresse 00-50-BF-11-10-E2 Netzwerkkarte Realtek RTL8139-Familie-PCI-Fast Ethernet-NIC (192. [ TRIAL VERSION ]) Netzwerkkarte WAN (PPP/SLIP) Interface (84.1 [ TRIAL VERSION ]) Peripheriegeräte: USB1 Controller VIA VT83C572 PCI-USB Controller USB1 Controller VIA VT83C572 PCI-USB Controller USB-Geräte Logitech iFeel Mouse (USB) DMI: DMI BIOS Anbieter American Megatrends Inc. DMI BIOS Version 62710 DMI Systemhersteller DMI Systemprodukt DMI Systemversion 0000000 DMI Systemseriennummer [ TRIAL VERSION ] DMI Motherboardhersteller Gigabyte Technology Co. Ltd. DMI Motherboardprodukt 7ZX DMI Motherboardversion 1.0 DMI Motherboardseriennummer [ TRIAL VERSION ] DMI Gehäusehersteller DMI Gehäuseversion DMI Gehäuseseriennummer [ TRIAL VERSION ] DMI Gehäusekennzeichnung [ TRIAL VERSION ] DMI Gehäusetyp Desktop Case DMI gesamte / freie Speichersockel 3 / 0

hab selber ne lösung gefunden ! für alle die es interessiert: #!/usr/bin/perl use strict; use File::Copy; # # main program # my @list = recursive_filesearch('C:\ICI_FileScanner\base'); foreach my $i (@list) { my $target = filecopy($i, 'C:\ICI_FileScanner\base', 'C:\ICI_FileScanner\save'); print "copied $target\n"; } exit(0); #///////////////////////////////////// # library #///////////////////////////////////// sub recursive_filesearch { my $startFolder = shift; my @folderList = ($startFolder); my @result = (); my ($currentFolder, $i, $fullPath); # # recursive search simulated with list. # while( @folderList ) { # # draw first element from list. # $currentFolder = shift(@folderList); # # parse folder with opendir/readdir/closedir loop. # opendir(DIR, $currentFolder) or die "cannot open folder $currentFolder: $!"; while( $i = readdir(DIR) ) { # # tricky: ignore folders which will cause havoc to # a recursive search. # next if '.' eq $i; next if '..' eq $i; # # build full filename/foldername. # $fullPath = $currentFolder . '\\' . $i; # # store folders for subfolder searches. # push(@folderList, $fullPath) if -d $fullPath; # # store any file/folder in result. # push(@result, $fullPath); } closedir(DIR); } # # return all found files/folders as list # return @result; } # # wrapper around File::Copy::copy. takes care of folders. # sub filecopy { my ($sourceFile, $fromFolder, $toFolder) = @_; my $targetFile; # # abort if $sourceFile don't belong to $fromFolder # if( 0 != index($sourceFile, $fromFolder) ) { die "$sourceFile outside of $fromFolder"; } my $i = length($fromFolder); $targetFile = $toFolder . substr($sourceFile, $i); # # assure existence of target folder # mkdir($toFolder) unless -d $toFolder; if( -d $sourceFile ) { # # folders are not copied but created. # mkdir($targetFile); } else { # # files are copied via File::Copy::copy. # copy($sourceFile, $targetFile); } return $targetFile; }

moin leute, ich hab nen problem mit perl ! ich brauch ein script das mir folder mit allen(files/subfolder) inhalten kopiert. und zwar breuchte ich nen ganz einfachen source code, wo ich eine "source folder" angeben und eine "destination folder"... bisher habe ich #!/usr/bin/perl use File::Copy ; # Quell und Zielverzeichnis my $base_dir = "C:/base" ; my $save_dir = "C:/save" ; # Verz. zum lesen oeffnen opendir (BASE, $base_dir) || die "Kann Verz. nicht lesen: "; # Verzeichnis einlesen (./.. aussortieren und checken ob datei) my @dir = readdir("BASE"); closedir (BASE); # Alle eingelesenen Dateien durchgehen foreach my $file (@dir) { # Und kopieren copy("$base_dir/$file", "$save_dir/$file"); } hierbei werden aber nur die dateien die sich direkt und dem ordner "base" befinden kopiert. die subfolders werden ignoriert. ich denke mal das ganze sollte irgendwie mit File::Find und File::Copy möglich sein. Nur ich weiß nicht wie , da ich erst seid heute mit Perl arbeite. WICHTIG IST!! das ich nicht das modul File::NCopy benutzen kann, da das ganze auf mehrern rechner laufen soll, auf dennen das cpan plugin nicht installiert ist. hoffe auf hilfe ! vorab danke !

habs mit docmd.runsql hinbekommen ! vielen dank für den hinweis !

servus leute, ich breuchte ma hilfe von ein paar profis (habe bereits die suchen fkt. benutz aber nix passendes gedunden) Folgendes: Ich habe eine Textdatei die z.b so aussieht: Name: Patrick Ort: frankfurt Status: ACTIVE telefon: 1234 Adresse: konradadenauerstr. 3 c: DE ou: Deutschland das ganze wiederholt sich dann ewig oft, jeder block pro person ist mit einer leerzeile getrennt... und die blöcke haben unterschiedlich viele einträge z.b noch email usw.. diese textdatei soll nun ausgelesen werden das tue ich folgendermaßen: Dim vLine As String Dim Path As String Dim vPos As Integer Dim fileobject Dim openfile Dim vSpalte As String Dim vValue As String Set fileobject = CreateObject("Scripting.FileSystemObject") Set openfile = fileobject.OpenTextFile("test.txt", 1, -2) vLine = openfile.Readline vPos = InStr(1, vLine, ":", 1) vValue = Right(vLine, vPos) vSpalte = Left(vLine, vPos - 1) z.b steht in vSpalte->Name und in vValue-> Patrick nun habe ich eine tablle in dennen alle Spalten existieren die auch in dem textfile vor dem : vorkommen. Jetzt soll vValue in der Tabelle in die Spalte Name geschrieben werden. Und genau hier beginnt das eigentliche Problem. Gibt es eine Funktion die den Wert einer Variable in eine Tabellen Spalte schreibt? würde mich freuen wenn mir einer weiterhelfen kann, danke im voraus !

wie gesagt habe bereits eine lösung unter dem oben genannten link gefunden ! aber trotzdem THX !

hum kann icht editieren egal hab ne lösung: http://support.microsoft.com/?kbid=319340

okay also das: Public Declare Auto Function ExtractIcon Lib "shell32" ( _ ByVal hInstance As IntPtr, ByVal lpszExeFileName As String, ByVal nIconIndex As Integer) As IntPtr Dim hInstance As IntPtr = Marshal.GetHINSTANCE( _ System.Reflection.Assembly.GetExecutingAssembly.Ge tModules()(0)) Dim hIcon As IntPtr = ExtractIcon ( _ System.Runtime.InteropServices.Marshal.GetHINSTANC E(), "c:\windows\system32\shell32.dll", 2) If Not hIcon.Equals(IntPtr.Zero) Then pb.Image = Bitmap.FromHicon(hIcon) End If ist für mich nur unverständlich weil ich fast nix der syntak verstehe. und die webseite die unterdem link liegt sagt mir nichts, da ich da kein code bsp. etc. gefunden habe

hmm hilft mir irgendwie nicht wirklich weiter

so ma wieder ne frage ich hab ne Listview und hab die mit datein und foldern gefüllt, dennen möchte ich jetzt wie im WindowsExplorer icons zuweisen. ( ordner.. exe datei usw) es gibt glaube ich ne möglichkeit aus der datei auszulesen welches icon zu ihr gehört und dieses dann in der imagelist anzeigen lassen. wenigestern war es so bei VB6 wenn man ne API eingefügt hat. das ganze bräuchte ich aber nun für vb.net ! kann mir einer weiterhelfen? thx vorab !

hab den code jetzt selber umgeschrieben und es funktioniert. falls jmd. interesse hat hier der code: (trotzdem thx 4 help @ Manfred) #Region " Sortieren nach angeklickter Spalte" Public Class ColumnComparer Implements IComparer Private ColumnIndex As System.Int32 Private Sorting As System.Windows.Forms.SortOrder Private Typ As Integer Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer Implements System.Collections.IComparer.Compare Dim Result As Integer Dim ix As System.Windows.Forms.ListViewItem Dim iy As System.Windows.Forms.ListViewItem ix = DirectCast(x, System.Windows.Forms.ListViewItem) iy = DirectCast(y, System.Windows.Forms.ListViewItem) Select Case Typ Case Type_String Result = System.String.Compare(ix.SubItems(ColumnIndex).Text, iy.SubItems(ColumnIndex).Text) Case Type_Date Dim date0 As DateTime Dim date1 As DateTime date0 = DirectCast(ix.Tag, DateTime) date1 = DirectCast(iy.Tag, DateTime) Result = System.DateTime.Compare(date1, date0) Case Type_Integer Dim int0 As Integer Dim int1 As Integer int0 = Integer.Parse("0" & ix.SubItems(ColumnIndex).Text) int1 = Integer.Parse("0" & iy.SubItems(ColumnIndex).Text) Result = int0 - int1 End Select If Sorting = SortOrder.Descending Then Result = -Result End If Return Result End Function Public Sub New(ByVal pColumnIndex As System.Int32, ByVal pSorting As System.Windows.Forms.SortOrder, ByVal pTyp As Integer) ColumnIndex = pColumnIndex Sorting = pSorting Typ = pTyp End Sub End Class Private Const Type_Integer As Integer = 2 Private Const Type_Date As Integer = 1 Private Const Type_String As Integer = 0 Private Sub lvFiles_ColumnClick(ByVal sender As Object, ByVal e As System.Windows.Forms.ColumnClickEventArgs) Handles lvFiles.ColumnClick lvFiles.BeginUpdate() Dim typ As Integer If e.Column = 0 Then lvFiles.ListViewItemSorter = Nothing If lvFiles.Sorting = SortOrder.Descending Then lvFiles.Sorting = SortOrder.Ascending Else lvFiles.Sorting = SortOrder.Descending End If lvFiles.Sort() Else If lvFiles.Sorting = SortOrder.Descending Then lvFiles.Sorting = SortOrder.Ascending Else lvFiles.Sorting = SortOrder.Descending End If Select Case e.Column Case 0 typ = Type_String Case 1 typ = Type_Integer Case 2 typ = Type_Date Case Else typ = Type_String End Select lvFiles.ListViewItemSorter = New ColumnComparer(e.Column, lvFiles.Sorting, typ) lvFiles.Sort() End If lvFiles.EndUpdate() End Sub #End Region

#Region " Sortieren nach angeklickter Spalte" Public Class ColumnComparer Implements IComparer Private ColumnIndex As System.Int32 Private Sorting As System.Windows.Forms.SortOrder Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer Implements System.Collections.IComparer.Compare Dim ix As System.Windows.Forms.ListViewItem Dim iy As System.Windows.Forms.ListViewItem ix = DirectCast(x, System.Windows.Forms.ListViewItem) iy = DirectCast(y, System.Windows.Forms.ListViewItem) If Sorting = SortOrder.Descending Then Return System.String.Compare(iy.SubItems(ColumnIndex).Text, ix.SubItems(ColumnIndex).Text) Else Return System.String.Compare(ix.SubItems(ColumnIndex).Text, iy.SubItems(ColumnIndex).Text) End If End Function Public Sub New(ByVal pColumnIndex As System.Int32, ByVal pSorting As System.Windows.Forms.SortOrder) ColumnIndex = pColumnIndex Sorting = pSorting End Sub End Class Private Sub lvFiles_ColumnClick(ByVal sender As Object, ByVal e As System.Windows.Forms.ColumnClickEventArgs) Handles lvFiles.ColumnClick lvFiles.BeginUpdate() If e.Column = 0 Then lvFiles.ListViewItemSorter = Nothing If lvFiles.Sorting = SortOrder.Descending Then lvFiles.Sorting = SortOrder.Ascending Else lvFiles.Sorting = SortOrder.Descending End If lvFiles.Sort() Else If lvFiles.Sorting = SortOrder.Descending Then lvFiles.Sorting = SortOrder.Ascending Else lvFiles.Sorting = SortOrder.Descending End If lvFiles.ListViewItemSorter = New ColumnComparer(e.Column, lvFiles.Sorting) lvFiles.Sort() End If lvFiles.EndUpdate() End Sub #End Region

hi, danke für die antwort, aber irgendwie hilft mir das nicht sehr viel weiter. vorallem kann ich die datein zum dl nach dem entpacken nicht öffnen...

vielleicht besteht die möglichkeit was mit den tags von den subitems zumachen?

hi leute, ich hoff ihr könnt mir weiterhelfen. Ich muss auf der arbeit nen explorer ( wie windoof explorer ) proggen. (vb.net) ich habe schon ne GUI usw.. links in nem ListView ( lvFolder) sind die Ordner und rechts die Datein ( lvFiles) in dem View lvFiles sind 2 SubItems. In Tabellen ( 3Spalten) Name, Dateigröße, Erstellungsdatum. Nun soll nach der Spalte sortiert werden auf die geklickt wird. Die sortierung nach name funktioniert bereits, und mir ist auch klar wie ich rauslese auf welche spalte geklickt wurde. Mein prob ist nun da listview eigentlich für txt geeignet ist ordnet der mit bei sortierung nach größe oder datum die items falsch an. Form: frmForm1 listview: lvFiles kann mir einer weiterhelfen oder nen code geben? thx im voraus ! ( hab unter suchen und google nix brauchbares gefunden )

hehe me hat morgen auch urlaub und montag geb !! :hawk

per telefon ? hmmm also per remote könnteste das machen, aber da brauchste nen anderen pc hmm. mitlerweile kannste das auch per funk, aber das is soviel ich weiß ne sack teure technik, und denke nicht das das was für dich ist. vielleicht gibts nen proggy was sowas wie auschalten oder reboot ausführt, wenn du auf dem rechner anrufst ( was ja mit verschiedenen software oder isdn-boxen geht ) und eine tastenkombination am tele drückst. aber keine ahnung wie sowas genau gehen kann ^^ sorry

hmm kann man hier nicht editieren ? also ich hab jetzt eins drauf was ich recht nice finde, aber das hat net so ne uhr usw.. kann man die noch nachträglich reinmachen ?

thx, dumme frage, wie tu ich den so nen theme dann einrichten ? weil einfach rechtsklick -> einstellungen -> themes -> browse und dann das was ich runtergeladen habe auswählen geht nicht. dann zeigt der mir immer noch das windows xp standart dingelchen an..

hmm nicht wirklich ich such halt so nen animirtes desktop hintergrund ding könnt auch weihnachtlich sein ^^ ,) hab gesehen, gibt so dinger wo sich immer der hintergrund ändert und da auch kalendar usw drauf is..