Login Form
IPv6 Enabled
Εμφάνιση 1-7 από 7
  1. #1
    Εγγραφή
    15-03-2007
    Ηλικία
    45
    Μηνύματα
    10
    Downloads
    0
    Uploads
    0
    πως μπορω να κανω αναζήτηση(ανα πεδιο) μέσω προκαθορισμένης φόρμας σε μια υπαρχουσα Βαση δεδομενων ?
    Μπορει να γινει μεσω του Visual Data Manager ?
    Οσο κι αν εψαξα δεν βρηκα καμια δυνατοτητα αναζητησης (find)
    Αν πρεπει να γινει με κωδικα υπαρχει κανενα σχετικο link?
    Ευχαριστω

  2. #2
    Εγγραφή
    14-02-2003
    Περιοχή
    Θεσσαλονίκη
    Ηλικία
    33
    Μηνύματα
    1.132
    Downloads
    19
    Uploads
    0
    Ταχύτητα
    16215/1021
    ISP
    Forthnet
    DSLAM
    Forthnet - ΒΥΖΑΝΤΙΟ
    Router
    NetGear
    SNR / Attn
    7.5(dB) / 7.4(dB)
    Για ποια έκδοση μιλάμε ;
    Γιατί στο 2005 παίζουν πολύ διαφορετικά από ότι παλιότερα.
    Πάντως, google is your friend

  3. #3
    Εγγραφή
    25-04-2006
    Μηνύματα
    495
    Downloads
    8
    Uploads
    0
    Τύπος
    ADSL2+
    Ταχύτητα
    8192/1024
    DSLAM
    Cyta Hellas - ΑΛΕΞΑΝΔΡΕΙΑ
    Router
    Pirelli
    Εάν κατάλαβα καλά αυτό που θέλεις να κάνεις, ένας τρόπος στην VB6 είναι μέσω του Remote Data Object. Αφού το ενεργοποιήσεις στο references
    Κώδικας:
    Dim cn As rdoConnection
    Dim en As rdoEnvironment
    
    Private Sub Form_Load()
        Set en = rdoEnvironments(0)
       
        
        Set cn = en.OpenConnection(dsName:="", Prompt:=rdDriverNoPrompt, _
            Connect:="uid=test;pwd=test;driver={SQL Server};" _
            & "server=testserver;database=test;")
    End Sub
    
    Private Sub Command1_Click()
    
        Dim Rdrs As rdoResultset
        Dim SQLstr As String
    
        SQLstr = "" 'Ετοιμάζεις το query string σου πχ select * from κτλπ
    
        Set Rdrs = cn.OpenResultset(SQLstr) 'Σου έρχονται τα αποτελέσματα 
        Text1.Text = Rdrs("xxx") ';όπου χχχ το όνομα το πεδίου στην βάση
        ' στο Text1.Text παίρνεις το αποτέλεσμα
        Rdrs.Close
    End Sub
    
    Private Sub Form_Unload(Cancel As Integer)
    
        cn.Close
        
    End Sub
    Το παραπάνω είναι για σύνδεση σε SQL Server. Το αντίστοιχο όμως είναι και για σύνδεση σε άλλη βάση δεδομένων μέσω οποιοσδήποτε ODBC driver. Εάν τα αποτελέσματα είναι παραπάνω από ένα υπάρχουν οι Rdrs.MoveNext, Rdrs.RowCount, Rdrs.MoreResults και άλλες για να χρησιμοποιήσεις.

  4. #4
    Εγγραφή
    15-03-2007
    Ηλικία
    45
    Μηνύματα
    10
    Downloads
    0
    Uploads
    0
    Συγγνωμη για την αργοπορια
    Καταρχην η εκδοση που εχω εναι η VB6
    Δεν με ενδιαφερει να χρησιμοποιησω ερωτηματα SQL σε αυτη τη φαση απλα θα ηθελα να εισαγω σε
    μια φορμα (που εχει τοσα TextBox οσα και τα πεδια) ενα ή περισσοτερα κειμενα (ή μερη αυτων) που θα αναζητησει.
    Το ζητουμενο ειναι να μπορει να γινει αναζητηση και ευρεση οταν ικανοποιουνται ταυτοχρονα ολες
    οι συνθηκες ταυτοχρονα για ολα τα πεδια (σαν να εχουμε το φιλτρο AND)
    Ευχαριστω για τις απαντησεις

  5. #5
    Εγγραφή
    25-04-2006
    Μηνύματα
    495
    Downloads
    8
    Uploads
    0
    Τύπος
    ADSL2+
    Ταχύτητα
    8192/1024
    DSLAM
    Cyta Hellas - ΑΛΕΞΑΝΔΡΕΙΑ
    Router
    Pirelli
    Σε πληροφορώ ότι δεν υπάρχει άλλος τρόπος εκτός από query στο να παίρνεις/δίνεις δεδομένα από μια βάση δεδομένων σε χαμηλό επίπεδο!!!
    Τέλος πάντων μάλλον εννοείς μέσω κάποιού activex (το οποίο σε πληροφορώ πάλι με query επικοινωνεί είτε είναι ANSY SQL είτε MS SQL , Oracle κτλπ). Πες μου την μορφή της Βάσης για να σε βοηθήσω .... Εάν είναι Access τότε υπάρχει έτοιμο μέσω της jet engine της Microsoft .... και του component Data Grid αλλά και πάλι λίγο κώδικα θα γράψεις. Μην το φοβάσαι γράψε
    Τελευταία επεξεργασία από το μέλος s_samaras : 15-04-07 στις 01:15.

  6. #6
    Εγγραφή
    15-03-2007
    Ηλικία
    45
    Μηνύματα
    10
    Downloads
    0
    Uploads
    0
    Η μορφη της βασης ειναι σε Access
    Εχω δοκιμασει την jet engine της Microsoft αλλα δεν μπορεσα να βγαλω ακρη.
    Αρχιζω να απογοητευομαι...

  7. #7
    Εγγραφή
    17-05-2005
    Περιοχή
    Κυψέλη
    Ηλικία
    45
    Μηνύματα
    639
    Downloads
    3
    Uploads
    0
    Ταχύτητα
    10240/1024
    ISP
    Forthnet
    Router
    Speedtouch 780(i)WL
    SNR / Attn
    11(dB) / 33(dB)
    Αν πίστευες ότι θα κάνεις δύο κλικ και θα σου τρέχει το πρόγραμμα που σκεφτόσουνα, θα σε απογοητεύσω. Κοίτα το παράδειγμα του s_samaras, φέρτο στα μέτρα σου και θα δουλέψει. Για παράδειγμα (στη χειρότερη περίπτωση), να πας row per row στη βάση και να συγκρίνεις κάθε record με τα στοιχεία που έχεις βάλει στη φόρμα.

    Αξίζει πραγματικά να ασχοληθείς με τον προγραμματισμό, απλά μην περιμένεις ότι είναι τόσο απλά και μην απογοητεύεσαι. Σιγά-σιγά θα μαθαίνεις πολλά.

Παρόμοια Θέματα

  1. βαση δεδομενων ....accbd...... help
    By eqvus in forum Unix - Linux
    Μηνύματα: 2
    Τελευταίο Μήνυμα: 27-06-08, 22:05
  2. μετατροπή μιας σχεσιακής βάσης δεδομένων σε berkeley xml βάση δεδομένων
    By malesina in forum Προγραμματισμός και γλώσσες προγραμματισμού
    Μηνύματα: 1
    Τελευταίο Μήνυμα: 17-04-08, 13:09
  3. Σχετικά με την Βάση Δεδομένων Firebird
    By dchri in forum Προγραμματισμός και γλώσσες προγραμματισμού
    Μηνύματα: 6
    Τελευταίο Μήνυμα: 11-12-07, 11:26
  4. βαση δεδομενων με javascript?
    By ironwiller in forum Web authoring, development & web design
    Μηνύματα: 3
    Τελευταίο Μήνυμα: 27-11-07, 15:47
  5. Βαση δεδομενων ports
    By dreadlord in forum ADSL & Broadband Hardware, routers και modems...
    Μηνύματα: 2
    Τελευταίο Μήνυμα: 03-11-04, 19:31

Tags for this Thread

Bookmarks

Bookmarks

Δικαιώματα - Επιλογές

  • Δεν μπορείτε να δημοσιεύσετε νέα θέματα
  • Δεν μπορείτε να δημοσιεύσετε νέα μηνύματα
  • Δεν μπορείτε να αναρτήσετε συνημμένα
  • Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας
  •  
  • Τα BB code είναι σε λειτουργία
  • Τα Smilies είναι σε λειτουργία
  • Το [IMG] είναι σε λειτουργία
  • Το [VIDEO] είναι σε λειτουργία
  • Το HTML είναι εκτός λειτουργίας