NASLOVNICAO NAMAUSLUGEKONTAKTION-LINE TESTOVI
   
ON-LINE UČIONICA
POPIS AUTOŠKOLA
SAVJETOVALIŠTE
ZAKONI I PRAVILNICI
AUTI, KREDITI, OSIGURANJA
SPORT - FORMULA 1
MALI OGLASI
HUMOR I ZABAVA
KORISNI LINKOVI
ON-LINE TESTOVI
 

Powered by:

 

 

  
  <% ' ASP Banner Rotator (BETA) for IIS 4.0+ ' ' Version: v1.0 ' Author : Keith Ollerton (ollertonk@postmaster.co.uk) ' F1-Computer Solutions (c) 2000 ' ' Last Modified: 09/08/2000 ' All rights reserved. ' ----------------------------- ' ' ASP Banner Rotator was tested under IIS 4.0 on a Windows NT 4.0 (SP5) ' ' ' Please send bug reports, comments, etc to ollertonk@postmaster.co.uk ' ' This version of ASP banner Rotator may be used and modified free of charge ' by anyone so long as this copyright notice and the comments above ' remain intact. By using this code you agree to indemnify ' Keith Ollerton from any liability that might arise ' from its use. ' ' Selling the code for this program without prior written consent is ' expressly forbidden. ' ' This is a beta release meant for testing only until this line is removed by the author. ' ' ChangeLog: ' 1.0 - Inital Release ' Set some general variables BackgroundColor = "D6DFE7" ' background color of the page (hex value) sDataSource = "e:\inetpub\wwwroot\autoskola.com.hr\banneri\470x70\banners.mdb" ' Local Path to Database ' Open Database Access Connection Set Con = Server.CreateObject( "ADODB.Connection" ) Con.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & sDataSource mySQL="SELECT * FROM banners" set rs=Server.CreateObject("adodb.recordset") rs.open mySQL, Con, 3 BannersRecordCount=rs.recordcount randomize() dim RandomNumber dim upperbound dim lowerbound upperbound = BannersRecordCount lowerbound = 1 ' Get a random record number between 1 and number of banners available RandomNumber = int ((upperbound - lowerbound + 1) * rnd + lowerbound) set rs=Server.CreateObject("adodb.recordset") ' Open Static RecordSet ' Equivalent values of adOpenKeyset, adLockPessimistic, adCmdTable ' from the adovbs.inc file which I haven't included here rs.open "banners", Con, 1, 2, &H0002 ' Move to the first record ready to cycle through them rs.movefirst ' Cycle through the banners until we've got the n'th one ' We can't do this with a SELECT statement as the record ' with an ID matching the RandomNumber may have been delete. dim intLoop For intLoop = 1 To RandomNumber - 1 rs.movenext next ' response.write "" ' response.write "" ' response.write "" ' response.write "" ' response.write "

" response.write "" response.write "" ' response.write " width='" & rs.fields("BannerWidth") & "' height='" & rs.fields("BannerHeight") & "'>" ' response.write "" ' response.write "" ' Increment the display count for this banner dim current current = rs.Fields("BannerDisplayCount")+ 1 rs.Fields("BannerDisplayCount")= current rs.update ' Check to see if the banner has expired - if it has delete its record if rs.fields("BannerExpiryDate") < date() then ' Delete the record - the 1 is the equivalent value of adAffectCurrent ' from the adovbs.inc file which I haven't included here rs.Delete 1 end if ' Finished with the recordset now - so close it con.close set con=nothing %>

 
ON-LINE UČIONICA
PROMETNA PRAVILA
prometna pravila
Kretanje vozila po kolniku Promet na raskrižjima
  Propuštanje vozila i prednost prolaska Mimoilaženje vozila
  Skretanje vozilom Zaustavljanje i parkiranje vozila

Mimoilaženje vozila

Mimoilaženje na ravnom dijelu kolnika

Pri mimoilaženju vozač je dužan sa svoje lijeve strane ostaviti dovoljan razmak između svojeg vozila i vozila s kojim se mimoilazi, a prema potrebi, i svoje vozilo pomaknuti k desnom rubu kolnika.

Ako zbog neke zapreke na cesti ili zbog drugih sudionika u prometu vozač ne može postupiti prema odredbi stavka 1. ovoga članka, dužan je usporiti kretanje svojeg vozila i, prema potrebi, zaustaviti ga da bi propustio vozilo iz suprotnog smjera.

Ako je zbog nedovoljne širine ceste ili zbog neke zapreke na cesti mimoilaženje onemogućeno, vozač kojem je to, s obzirom na osobine ceste i okolnosti prometa, lakše i sigurnije izvesti, dužan je prvi se zaustaviti i, prema potrebi, kretanjem unatrag ili na drugi način pomaknuti svoje vozilo i zauzeti na cesti položaj kojim se omogućuje mimoilaženje.

Mimoilaženje vozila na raskrižju

Na raskrižju se vozila koja dolaze iz suprotnih smjerova i skreću ulijevo kreću tako da vozač mimoilazi vozilo iz suprotnog smjera na taj način da ga propušta sa svoje desne strane.

 

 

 

Mimoilaženje vozila na cesti s uzdužnim nagibom

Kada se vozila kreću na dijelu ceste s velikim uzdužnim nagibom (npr. planinska cesta) gdje je mimoilaženje otežano ili se vozila ne mogu mimoići, vozač koji se kreće niz nagib mora omogućiti mimoilaženje zaustavljanjem vozila na mjestu gdje se vozila mogu mimoići. Ukoliko vozač vozila koji se kreće uz nagib ima prikladnije mjesto za zaustavljanje, onda je to dužan učiniti kako bi se vozila što sigurnije mimoišla. Ukoliko se mimoilaženje ne može izvesti zaustavljanjem jednog od vozila na nekom prikladnom mjestu, mimoilaženje se izvodi tako da se jedno vozilo mora kretati unatrag. Kretat će se unatrag:

1. svako vozilo koje se susrelo s vozilom koje vuče priključno vozilo,

 

2. teretni automobil koji se susretne s autobusom,

     

 

3. vozilo koje se susrelo s vozilom više kategorije,

 

4. ako se mimoilaze vozila iste kategorije - vozilo koje se kreće niz nagib, osim ako je, s obzirom na uvjete i položaj vozila na cesti, lakše i sigurnije da to učini vozač vozila koje se kreće uz nagib.

 
 
design & hosting by Internet arhiva d.o.o.