Re: Zapłacę 1000 zł za działającą procedur
Użytkownik "Andrzej J. Turowicz"
jak sprawdzic w ktorej lini blad?
Witam, Jak sprawdzić w ktorej lini bląd? Wiem że można ponumerować linie w programie i jak zrobić do tego obsługę?
Re:_Instalacyjna_wersja_programu_z _bazą_danych_(vb2005+mssql_server)
sikanowski@op.pl napisał(a): > > graf grafen w (news:fg2koq$brs$1@inews.gazeta.pl) napisał(a): > > > Witam, > > > stworzyłem mały programik w vb2005, który operuje na bazie danych ms sql > > > 2005 exp. edition. Niestety nie mam pojęcia, jak sprawić aby wraz z > > > instalacją aplikacji udało się zainstalować bazę z odpowiednimi > > > tabelami, widokami itp. Czy ktoś z grupowiczów ma pomysł, jak to zrobić? > > > > dołącz kwerendy tworzące tabele, widoki itd. i napisz skrypt uruchamiający > > kwerendy. > > > > brunner > > a do samego tworzenia instalatora ja uzywam > > Nullsoft Install System > > w ktorym mozesz naprawde poszalec sprawdzac wersje juz istniejacych > zainstalowanych czesci itp > > Dzieki, stworzyłem skrypty, co pomogło. Na razie korzystam z wbudowanego instalatora w VB, mi wystarczy - być może za jakiś czaś skorzystam z Nullsofta... Czy to darmowe narzędzie? -- Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Re: ado.net - szukanie tekstu w bazie access
> Zrobilem tak jak napisales,pozmienialem nazewnictwo na swoje, ale nie > dziala. > Nie wypelniaja sie textbox2 i textbox3. > Dodatkowo przy kopilacji, VB pokazuje komunikat "Variable TekstKol2 is > used before it has been assigned a value. A null reference exception > could result at runtime" > > P.S. WYtlumacz mi linijke: > filtr =3D "idkarty=3D' " & SzukanyTekst & " ' " > > dzieki z gory Witam ponownie, Przepraszam ale jak pisa=B3em tamten kod nie mia=B3em dost=EApu do kompa z VB i zrobi=B3em kilka b=B3=EAd=F3w. Kod powinien wygl=B1da=E6 tak: 'kod po=B3=B1czenia z baz=B1 danych pomijam 'ds - dataset wype=B3niny danymi z bazy Dim TekstKol2 as String Dim TekstKol3 as String Dim SzukanyTekst as String Dim filtr as String ' tekst kt=F3ry wpisa=B3e=B6 w 1 textbox-ie SzukanyTekst=3Dtextbox1.text ' kolumna1, kolumna2, kolumna3 - odpowiednie ' kolumy w tabeli w bazie danych ' kolumna1 - kolumna w tabeli w kt=F3rej znajduje si=EA szukany tekst filtr=3D"kolumna1=3D'" & SzukanyTekst & "'" dim Wynik() as DataRow 'jezeli szukany tekst pojawia si=EA kilkukrotnie w kolumnie 'do tablicy Wynik trafi=B1 wszystkie rekordy zawieraj=B1ce 'szukany tekst ' zamiast nazwa tabeli podajesz nazwe tabeli lub jej indeks w datasecie Wynik=3Dds.tables(NazwaTabeli).select(filtr) For Each dr as DataRow in Wynik TekstKol2=3Ddr("kolumna2") TekstKol3=3Ddr("kolumna3") Me.TextBox2.Text=3DTekstKol2 Me.TextBox3.Text=3DTekstKol3 Next ten zapis filtr =3D "idkarty=3D'" & SzukanyTekst & "'" oznacza =BFe szukamy rekodru, kt=F3ry w kolumnie idkarty b=EAdzie mia=B3 warto=B6=E6 odpowiadaj=B1c=B1 warto=B6ci zmiennej SzukanyTekst. Gdyby=B6my chcieli wpisa=E6 tutaj zamiast zmiennej warto=B6=E6 to wygl=B1da=B3o by to np tak: filtr=3D"idkarty=3D'1234'" Innaczej t=B3umacz=B1c ta linijka jest odpowiednikiem klauzuli WHERE w instrukcji SQL np: SELECT * FROM karty WHERE idkarty=3D'1234' mam nadzieje =BFe tym razem wszystko ju=BF zadzia=B3a pozdrawiam, sweet_dreams
jak w textbox sprawdzić czy tylko cyfry albo Nazwisko
Witam. Nie bardzo wiem jak sobie poradzić i może ktoś mi pomoże Na userform wstawiam sobie dwa pola textbox. W jednym będę wpisywał nazwisko a w drugim kwotę Nazwisko chcę mieć tak, żeby pierwsza litera była duża, reszta małe. Natomiast w polu kwota chcę mieć tylko cyfry i żadnych liter. Jak to zrobić, żeby w polu nazwiska makro sobie porawiało samo użytkownika a w polu kwota albo pokazało komunikat jak się wpisze coś innego niż cyfrę albo nie pozwalało wpisać liter? Szukam i myślę i nic nie mogę wyszukac ani wymyśleć a pewnie to się da łatwo zrobić. Pomoże ktoś? -- PawełJ