Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[POMOCY] jak połączyć Mysql / database z programem?


Cooleka

Rekomendowane odpowiedzi

Opublikowano

Cześć.

 

No jak w temacie.

Robiłem tak jak na youtube jest i nie wyszło. Program zacinał się i nic...

 

Ja potrzebuję program, który będzie miał panel logowania (zrobiłem) i rejestracje na stronie www. (zrobiłem).

 

Po poprawnym zalogowaniu załadowanie tabeli bazy danych z tematem wartością i ID strony.

Strona: www.enterplace.pl/komeniusz <-- program ma być do podobnej strony, lecz ma on edytować treść i wartość strony. (Działów).

 

2 pytanie to np. ale , że będzie przycisk [ B ] i w textbox1 / 2 / x ... będzie dodawało to na zaznaczony tekst. Mam skrypt www. z takim panelem, lecz on jest niebezpieczny :)

 

 

Z góry dziękuję.

1377774857-U369478.png

  • 4 tygodnie później...
Opublikowano

 Dim conn As MySqlConnection
 'łączenie do bazy danych
 conn = New MySqlConnection()
 conn.ConnectionString = "server=; user id=; password=; database="
 Try
	 conn.Open()
 Catch myerror As MySqlException
	 MsgBox("Błąd przy łączeniu do bazy danych !")
 End Try
 Dim myAdapter As New MySqlDataAdapter
 Dim sqlquery = "SELECT * FROM tabela WHERE username ='" + txtuser.Text + "' AND password= '" + MaskedTextBox1.Text + "'" ' tabela - nazwa naszej tabeli, username to nazwa rekordu? w tabeli, password analogicznie
 Dim myCommand As New MySqlCommand()
 myCommand.Connection = conn
 myCommand.CommandText = sqlquery
 myAdapter.SelectCommand = myCommand
 Dim myData As MySqlDataReader
 myData = myCommand.ExecuteReader()
 'sprawdzanie czy uzytkownik istnieje
 If myData.HasRows = 0 Then
        msgbox( "Hmm... Coś poszło nie tak, poparaw prosze hasło i/lub nazwę użytkownika.")

 Else

	 MsgBox("Zostałes zalogowany")
	 form2.Show()
 End If

 

 

a no i jeszcze importujesz :

 

    Imports MySql.Data.mysqlclient

 

Kilka wskazówek Host z MySql musi mieć mozliwość włączenia zdalnego dostępu do bazy(nie tylko z local hosta)

Connector podany przez Miszcza musi byc zainstalowany :D

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...