Connexion rapide:  

Forum: Greek Forum

Sujet Ignore Drives

Ce topic est ancien et peut contenir des informations obselètes ou incorrectes.

Στο laptop μου έχω τον δίσκο C: (Windows + Software) και τον δίσκο D: (μόνο μουσική). Ποια τιμή θα πρέπει να βάλω στο πεδίο "ignoreDrives", ώστε να μην δημιουργείται βάση δεδομένων για τα αρχεία που υπάρχουν στον C: (imports)?
 
Posté Thu 12 Sep 19 @ 9:30 am
 
Posté Thu 12 Sep 19 @ 10:32 am
Κι επειδή βάζω στοίχημα οτι θα ρωτήσεις πως προκύπτουν οι τιμές:

Private Function CalcVal() As String
        Dim Val As Long = 0
        If chk_DriveA.Checked = True Then Val = Val + 1
        If chk_DriveB.Checked = True Then Val = Val + 2
        If chk_DriveC.Checked = True Then Val = Val + 4
        If chk_DriveD.Checked = True Then Val = Val + 8
        If chk_DriveE.Checked = True Then Val = Val + 16
        If chk_DriveF.Checked = True Then Val = Val + 32
        If chk_DriveG.Checked = True Then Val = Val + 64
        If chk_DriveH.Checked = True Then Val = Val + 128
        If chk_DriveI.Checked = True Then Val = Val + 256
        If chk_DriveJ.Checked = True Then Val = Val + 512
        If chk_DriveK.Checked = True Then Val = Val + 1024
        If chk_DriveL.Checked = True Then Val = Val + 2048
        If chk_DriveM.Checked = True Then Val = Val + 4096
        If chk_DriveN.Checked = True Then Val = Val + 8192
        If chk_DriveO.Checked = True Then Val = Val + 16384
        If chk_DriveP.Checked = True Then Val = Val + 32768
        If chk_DriveQ.Checked = True Then Val = Val + 65536
        If chk_DriveR.Checked = True Then Val = Val + 131072
        If chk_DriveS.Checked = True Then Val = Val + 262144
        If chk_DriveT.Checked = True Then Val = Val + 524288
        If chk_DriveU.Checked = True Then Val = Val + 1048576
        If chk_DriveV.Checked = True Then Val = Val + 2097152
        If chk_DriveW.Checked = True Then Val = Val + 4194304
        If chk_DriveX.Checked = True Then Val = Val + 8388608
        If chk_DriveY.Checked = True Then Val = Val + 16777216
        If chk_DriveZ.Checked = True Then Val = Val + 33554432
        Return Val.ToString
    End Function
 
Posté Thu 12 Sep 19 @ 10:36 am
Αν το θες και ακόμα πιο προγραμματιστικά:

Κάνε ένα πίνακα με τα γράμματα με ανάποδη σειρά:
Z,Y,X,W,V,U,T,S,R,Q,P,O,N,M,L,K,J,I,H,G,F,E,D,C,B,A
Βάλε από κάτω 0 για να διαβάζει το δίσκο, 1 για ignore
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0

Η τιμή που βλέπεις είναι binary
Μετέτρεψε την σε δεκαδική
100 binary = 4
 
Posté Thu 12 Sep 19 @ 10:47 am
Σε ευχαριστώ πολύ...

Υ.Γ. Ακόμα αναρωτιέμαι γιατί δεν με άκουσαν να μεταβούν στο δεκαδικό, όταν έπρεπε... :-)))
 
Posté Thu 12 Sep 19 @ 11:51 am


(Les anciens sujets et forums sont automatiquement fermés)