VBiB/ACCB.net - Visual Basic in België | .net Ineta User Group  
(login to hide)
Hoofdmenu

Advertenties

Het Computer Winkeltje HCW


Evenementen

DB INLEZEN MET VB - Oud Forum inhoud (alleen lezen)
U bevindt zich > Oude forum > Visual Basic 6.0 > Databases ... (VB 6.0) > DB inlezen met VB
Gepost door Repi3 gepost op 12/04/2005 om 12:05

Hallo allemaal,

Ik heb het volgende probleem, ik heb een simpel(test) databasje.
Ik wil nu dat deze ingelezen worden door VB.
Ik heb ook een erg simpel formpje gemaakt. (alles is om te testen)

Nu zou ik willen dat in de comboBox, de ID nummers komen die in mijn database zitten, en dat de andere textvelden worden ingevuld met de inhoud die dat ID nummer bezit.

Ik heb hier al wat gesearched en voorbeeldjes geprobeerd, maar ik heb nog geen enkel in werking kunnen steken.
Daarom kom ik hier eens jullie hulp vragen.

Alvast bedankt.

Gepost door Hydra gepost op 12/04/2005 om 14:39
Helaas kan ik op 1 of andere manier de database van jouw niet openen. Waarschijnlijk kan ik hem niet met Acces 97 openen, maar als je eens op dit topic kijkt, want daar heb ik een "simpel" voorbeeldje geplaatst. http://forum.visualbasic.be/forum_posts.asp?TID=2130&PN= 1
Gepost door Repi3 gepost op 12/04/2005 om 15:49

Hydra zei:

Helaas kan ik op 1 of andere manier de database van jouw niet openen. Waarschijnlijk kan ik hem niet met Acces 97 openen, maar als je eens op dit topic kijkt, want daar heb ik een "simpel" voorbeeldje geplaatst. http://forum.visualbasic.be/forum_posts.asp?TID=2130&PN= 1

ik zit hier idd met Acces 2000, nu heb ik het probleem gevonden, en heb ik ondertussen in 'gang' gekregen

Nu heb ik wel nog een vraagje, dit is nu een database op je locale PC, kan je ook een database gaan uitlezen die online staat.
Want mijn bedoeling zal zijn, dat iemand een bestelformulier invult, en dat ik deze via VB zal inlezen, ik kan nu op een locale PC al inlezen.
Dus mijn vraag is of iemand hier ervaring mee geeft, of als iemand mij kan verder helpen, want ik ben nogal een redelijke 'leek' in de VB-toestanden

Alvast Bedankt

Gepost door Hydra gepost op 12/04/2005 om 16:48
Tja, ik heb daar helemaal geen kaas van gegeten, maar zou je dan niet (logischerwijs) gebruik moeten maken van een IP-adres? of naar de directe link? Of het gaat werken weet ik neit, maar je zou het altijd kunnen proberen.
Gepost door Mibe gepost op 12/04/2005 om 16:57
Dit is theoretisch perfect mogelijk MAAR iedere webhoster sluit die connectie bewust af. Ik zou info vragen bij webhoster of dit kan toeglaten worden, maar vrees een negatief antwoord. (veiligheid andere clienteel)

Succes
Gepost door Repi3 gepost op 12/04/2005 om 21:30
Ik kan bij mijn hosting, aanmelden bij PHPmyAdmin, en ik heb eens database toegevoegd.
Ik heb een mail gestuurd naar hosting of ze dit ondersteunen, maar heb je niets zodat ik dat al eens kan testen.
Want als ik nu via VB connecteer, en mijn gebruikersnaam en passwoord toevoeg, moet dit toch lukken, niet?

Een voorbeeld zou tof zijn, ik kan het altijd dan op mijn localhost thuis zetten, maar liever bij een hosting natuurlijk.
Gepost door Mibe gepost op 12/04/2005 om 23:16
U kan alle mogelijke connectiestrings vinden op www.connectionstrings.com, dus ook voor MSSQL en MYSQL, dit met alle parameters.

Succes
Gepost door Repi3 gepost op 13/04/2005 om 11:06

Mibe zei:

U kan alle mogelijke connectiestrings vinden op www.connectionstrings.com, dus ook voor MSSQL en MYSQL, dit met alle parameters.

Succes

 

Heb hier het 1 en andere van geprobeerd, maar ik moet zeggen dat het nog niet echt gelukt is.

Is er hier niemand die daar ervaring mee geeft, ofzo.
Er moeten toch mensen zijn die dit al eens geprobeerd hebben.

Gepost door Mibe gepost op 13/04/2005 om 11:12
Heb je al antwoord verkregen van hosting? Lokaal ben ik er al in geslaagd, maar niet online, net door dat poort 3306 dicht is. Online zullen alle testen falen.
Gepost door Hydra gepost op 13/04/2005 om 11:15
Je zou poort 3306 open kunnen gooien natuurlijk.  Lijkt mij de korste klap.
Gepost door malloc gepost op 13/04/2005 om 11:26
Repi3 zei:

ik zit hier idd met Acces 2000, ...

In ieder geval kan je geen Access database online plaatsen en hiermee connecteren.

Je moet hiervoor MySQL of een andere database server gebruiken die de webhoster dan ook moet toelaten en beschikbaar stellen. Daarna moet nog die bewuste poort open, (dit kan ook wel een andere poort zijn dacht ik) en ook dit moet de webhoster doen.
Gepost door Repi3 gepost op 13/04/2005 om 16:20

Mibe zei:

Heb je al antwoord verkregen van hosting? Lokaal ben ik er al in geslaagd, maar niet online, net door dat poort 3306 dicht is. Online zullen alle testen falen.

Ik heb nog geen antwoord gekregen van Hosting :(.
Zou je zo vriendelijk willen zijn, om de code van de localhost eens te posten of te pm'en /e-mailen.
Ik zal dan thuis vlug een mySQL server opzetten en eens testen.
Dan kan ik in uiterste geval nog mijn eigen PC als online database gebruiken.

Gepost door Mibe gepost op 13/04/2005 om 17:51
U moet op de client pc mysql odbc driver 3.51 installeren (te vinden op mysql.com)

U moet bij references aanvinken: Microsoft ActiveX Data Object 2.8 library

Code:
Dim DbPath As String
Dim Db As New ADODB.Connection
Dim Rs As New ADODB.Recordset
DbPath = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=UWSERVER;PORT=3306;DATABASE=ld;USER=UWLOGIN;P ASSWORD=UWPASSWORD;OPTION=3;"

Db.Open DbPath

Rs.ActiveConnection = Db
Rs.Source = "users" 'Tabelnaam
Rs.Open

While Not Rs.EOF
    List1.AddItem Rs!username 'Fieldnaam
    Rs.MoveNext
Wend
Rs.Close
Db.Close
Set Rs = Nothing
Set Db = Nothing


Dit werkt nu perfect bij mij ;-), terwijl mysql op andere pc staat (ook via buiten!).
Gepost door Repi3 gepost op 13/04/2005 om 21:59
Mibe zei:

U moet op de client pc mysql odbc driver 3.51 installeren (te vinden op mysql.com)

U moet bij references aanvinken: Microsoft ActiveX Data Object 2.8 library

Code:
Dim DbPath As String
Dim Db As New ADODB.Connection
Dim Rs As New ADODB.Recordset
DbPath = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=UWSERVER;PORT=3306;DATABASE=ld;USER=UWLOGIN;P ASSWORD=UWPASSWORD;OPTION=3;"

Db.Open DbPath

Rs.ActiveConnection = Db
Rs.Source = "users" 'Tabelnaam
Rs.Open

While Not Rs.EOF
    List1.AddItem Rs!username 'Fieldnaam
    Rs.MoveNext
Wend
Rs.Close
Db.Close
Set Rs = Nothing
Set Db = Nothing


Dit werkt nu perfect bij mij ;-), terwijl mysql op andere pc staat (ook via buiten!).

super fantastisch , ik heb het hier thuis met mijn eigen opgezete mySQLserver (localhost) kunnen doen werken.
Wat ik me nu wel afvraag (wss weer zo'n nOOb vraagje) maar hoe moet ik nu bij server mijn online database aanspreken.
Voor mijn online databse moet ik me hier aanmelden.

Code:
DbPath = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=http://phpmyadmin7.sohosted.com/localho st;PORT=3306;DATABASE=dbnaam;USER=UWLOGIN;P ASSWORD=UWPASSW ORD;OPTION=3;"

Dit werkt natuurlijk niet, ik ben nu wel een beetje een leek en weet(versta) niet echt wat ik nu als SERVER moet ingeven zodat ie weet dat hij DIE localhost moet aanspreken.
Als je een idee hebt ...

Alvast veeeel bedankt
Gepost door Mibe gepost op 13/04/2005 om 22:11
Dit moet u uw hoster vragen.
Die phpmyadmin7 is enkel een module om db aan te spreken

mss www.sohosted.com/, maar dit zal wel niet open gesteld zijn/worden. Mss gewoon de website adres van uw website.

Al een antwoord verkregen van hosting, want standaard zal dit zeker niet lukken ze
Gepost door Repi3 gepost op 13/04/2005 om 22:26
wohoo, sry voor het mss voorspoedig vragen.

Maar ik heb hier via via een site gevonden, met een perfect voorbeeld op.
http://www.veign.com/vrc_codeview.asp?type=app&id=92
Dit is om te testen, ik heb dan eerst mijn eigenserver via IP gecontroleerd en dit werkte, en heb zojuist van mijn hosting een Record servernaam gekregen, heb dan via dat testprogramma'tje het geprobeerd en het werkte, dan geimplimenteerd in jouw voorbeeld en het is gelukt.

Super bedankt om mij te helpen !!!
Gepost door Repi3 gepost op 14/04/2005 om 14:55

Mibe, ik ben hier terug hoor

Ik heb nog 1 vraagje, ik heb dus een een ComboBox, en daarmee kan ik bepaalde RecordSet's selecteren.
Als ik deze selecteer, komt de info in de Text vakjes terecht.
Nu zou ik moeten, wanneer ik 1 geselecteerd heb, dat ik via een knop(delete) de inhoud van die RecordSet deleten.
Ik heb bij jouw Faq oefeningen, gekeken en er staat daar idd een voorbeeld voor het deleten, maar ik slaag er niet in om deze in werking te krijgen, maar het principe is ook iets anders.

Hopelijk versta je wat mijn bedoeling is, en kan je me wat helpen.

Alvast Bedankt !

Start - Zoeken op oude forum

 

 
Postnuke - ADODB Database - PHP 4/5 - pnPhpBB2 - Hosting bij Openminds
Met dank aan Jürgen voor de jarenlange inzet van visualbasic.be (anno 21-12-2000)
vbib.be gestart op 1/03/06 (extra vanaf 1/09: vbnet.be en vbdotnet.be)
VBiB is gerelateerd met wintips.be

Nieuwsbrief RSS Feed: backend.php