Visua basic ΣΥΝΔΕΣΗ ΜΕ ΒΑΣΗ ΣΤΟ internet

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
akiskollas18
Δημοσιεύσεις: 6
Εγγραφή: 25 Αύγ 2007 13:40

Visua basic ΣΥΝΔΕΣΗ ΜΕ ΒΑΣΗ ΣΤΟ internet

Δημοσίευση από akiskollas18 » 29 Αύγ 2007 11:59

Εχω φτιάξει στην Visual Basic μια φόρμα όπου πατώντας ένα κουμπί και τα δεδομένα αποθηκεύονται σε μια βάση δεδομένων που βρίσκεται στην επιφάνεια εργασίας
ο κώδικας που έχω φτιάξει είναι ο παρακάτω ο οποίος λειτουργεί μια χαρά
-------------------------
Dim sConn As String
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim spath As String
Dim onoma, eponimo, dieuthinsi, tilephonooikias, kinitotilephono, fax, email, allesplirofories, eponimiaetaireias, dieuetaire1, tilephonoetaireias1, tilephonoetaireias2, arithmistrapezikoulogariasmou, eponimiatrapezas, afm, doy, adt As String
Dim sSQL As String
spath = App.Path & "C:\Documents and Settings\.......
sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & spath
sSQL = "INSERT INTO pelates (onoma, eponimo, dieuthinsi, tilephonooikias, kinitotilephono,fax,email,allesplirofories ,eponimiaetaireias, dieuetaire1, tilephonoetaireias1, tilephonoetaireias2 ,arithmistrapezikoulogariasmou, eponimiatrapezas, afm, doy, adt ) values ( '" & Text1.Text & "','" & Text2.Text & "' , '" & Text3.Text & "' , '" & Text4.Text & "' ,'" & Text5.Text & "' ,'" & Text6.Text & "' ,'" & Text7.Text & "','" & Text8.Text & "' ,'" & Text9.Text & "' ,'" & Text10.Text & "' ,'" & Text11.Text & "' ,'" & Text12.Text & "' ,'" & Text13.Text & "' ,'" & Combo1.Text & "' ,'" & Text14.Text & "' ,'" & Text15.Text & "' ,'" & Text16.Text & "' )"
'ÔÝëïò SQL åñþôçìá
db.ConnectionString = sConn
db.Open "mydb2"
rs.ActiveConnection = db
rs.LockType = adLockOptimistic
rs.CursorType = adOpenKeyset
rs.Open sSQL
-------------------------------------------------------
Εγώ θα ήθελα να ανεβάσω την βάση στο internet στην σελίδα μου και να την ανοίγει απο εκέι και να αποθηκεύει και να βρίσκει αρχεία . Πως θα μπορούσα να τροποποιήσω τον παραπάνω κώδικα ??

Άβαταρ μέλους
kkal
Δημοσιεύσεις: 9
Εγγραφή: 24 Δεκ 2003 00:15
Τοποθεσία: Ptolemaida
Επικοινωνία:

Visua basic ΣΥΝΔΕΣΗ ΜΕ ΒΑΣΗ ΣΤΟ internet

Δημοσίευση από kkal » 09 Σεπ 2007 23:44

φίλε μου... φαντάζομαι η βάση σου είναι σε mdb ε ;; δηλαδή σε Microsoft Access.

Θα σε στεναχορίσω αλλά δεν γίνετε..!!

θα πρέπει να δημιουργήσεις μια βάση συνήθως mysql...

και μια φόρμα που θα κάνεις τις καταχωρήσεις σου.

στη συνέχεια...θα φτιάξεις σε vb ένα πρόγραμμα που θα καταχωρεί όλα σου τα στοιχεία μέσα
απο το παραπάνω scrpitaki .

Τέλος ανάκτηση δεδομένων θα μπορείς να κάνεις με το εργαλείο Inet1.

Αυτά πιστεύω να σε βοήθησα...!

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες