[es] - Promena sadrzaja naslovne linije programa uradjenog u Accessu

banera30

Član broj: 206094
Poruke: 28
*.eunet.rs.

Profil

Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{13.01.2009. u 19:31 - pre 186 meseci}

Kako uz pomoc koda, bez koriscenja opcije Startup menjati sadrzaj u naslovnoj liniji programa radjenog u Accesu

Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
93.86.21.*

+1 Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{14.01.2009. u 13:40 - pre 186 meseci}

Code:

Public Sub Form_Load()

Me.Caption = "Naziv"

End Sub

Odgovor na temu

banera30

Član broj: 206094
Poruke: 28
*.eunet.rs.

Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{15.01.2009. u 17:18 - pre 185 meseci}

Možda nisam dovoljno jasno formulisao pitanje - ne mislim na naslovnu liniju forme nego na naslovnu liniju programa, odnosno na liniju čiji se sadrzaj menja kroz opciju Tools - Startup - ApplicationTitle
U svakom slučaju
Hvala

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.rs.

Sajt: www.vasictech.net

+1 Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{15.01.2009. u 17:22 - pre 185 meseci}

Mislim da bi ovo pre trebalo da ide u Ostale Programske jezike, jes da je u pitanju VBS, ali nema veze sa VB6 :\

Odgovor na temu

Branko_S

Član broj: 130918
Poruke: 24
161.51.11.*

Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{16.01.2009. u 08:29 - pre 185 meseci}

Funkcija radi u Access 2003:

Code:

Function MenjajNaslov(var_NoviNaslov As Variant)
    On Error GoTo MenjajNaslov_Err

    If IsNull(var_NoviNaslov) Then Exit Function

        Dim NoviProperty As Property
            CurrentDb.Properties("AppTitle") = var_NoviNaslov

            CurrentDb.Close

MenjajNaslov_Cao:
    Exit Function

MenjajNaslov_Err:

        If Err = 3270 Then
            Set NoviProperty = CurrentDb.CreateProperty("AppTitle", dbText, var_NoviNaslov)
            CurrentDb.Properties.Append NoviProperty
            Resume
        Else
            'MenjajNaslov = False
            Resume MenjajNaslov_Cao
        End If
End Function

_{[Ovu poruku je menjao Aleksandar Ružičić dana 16.01.2009. u 20:49 GMT+1]}

Odgovor na temu

banera30

Član broj: 206094
Poruke: 28
*.eunet.rs.

Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{16.01.2009. u 19:16 - pre 185 meseci}

Ovo sto si mi poslao je OK međutim kada pozovem funkciju preko kom.dugmeta sadržaj promenjive postane sadrzaj naslovne linije sa učitavanjem Accessa - da li je moguće da se prilikom pozivanja funkcije menja sadrzaj naslovne linije programa kada stisnem kom.dugme na nekoj od formi već učitanog Accesa

Hvala za kod

Odgovor na temu

Branko_S

Član broj: 130918
Poruke: 24
82.114.95.*

Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{17.01.2009. u 17:45 - pre 185 meseci}

ubaci RefreshTitleBar

Code:
Function MenjajNaslov(var_NoviNaslov As Variant)
    On Error GoTo MenjajNaslov_Err

    If IsNull(var_NoviNaslov) Then Exit Function

        Dim NoviProperty As Property
            CurrentDb.Properties("AppTitle") = var_NoviNaslov
            RefreshTitleBar

            CurrentDb.Close

MenjajNaslov_Cao:
    Exit Function

MenjajNaslov_Err:

        If Err = 3270 Then
            Set NoviProperty = CurrentDb.CreateProperty("AppTitle", dbText, var_NoviNaslov)
            CurrentDb.Properties.Append NoviProperty
            RefreshTitleBar
            Resume
        Else
            'MenjajNaslov = False
            Resume MenjajNaslov_Cao
        End If
End Function

_{[Ovu poruku je menjao Aleksandar Vasic dana 19.01.2009. u 14:14 GMT+1]}

Odgovor na temu

banera30

Član broj: 206094
Poruke: 28
*.eunet.rs.

Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{20.01.2009. u 19:00 - pre 185 meseci}

Ovo je pomoglo.
Puno hvala

Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net

+44 Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{20.01.2009. u 21:29 - pre 185 meseci}

Citat:

Aleksandar Vasic: Mislim da bi ovo pre trebalo da ide u Ostale Programske jezike, jes da je u pitanju VBS, ali nema veze sa VB6 :\

pogledaj malo bolje opis foruma ciji si moderator:

Citat:

Visual Basic 6 i starije verzije, VBScript, ASP, VBA. Razvoj desktop, web i office aplikacija i skripti.

i btw ovo je VBA ne VBS ;)

rafforum.rs - Forum Računarskog Fakulteta

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
78.30.146.*

Sajt: www.vasictech.net

+1 Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{20.01.2009. u 21:33 - pre 185 meseci}

Znam ja da ti meni sad trazis dlaku u jajetu, ali to je napisano pre nego sto sam postao moderator istog :P

Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net

+44 Profil

Re: Promena sadrzaja naslovne linije programa uradjenog u Accessu

^{20.01.2009. u 21:37 - pre 185 meseci}

samo dan-dva pre toga :)

rafforum.rs - Forum Računarskog Fakulteta

Odgovor na temu