VELEMATIKA
http://www.cursor.hr/pa.nsf/a2b44f0ce2999748c125667c0049a96b/d1dc506d1061f749c1256660003524c2?OpenDocument
+385 (1) 2334-766, 2302-072

http://www.poslovniforum.hr/imenik_tvrtke_informacije/trgovina_na_veliko_veleprodaja_posredovanje.asp?id=14777

Trg Johna Kennedyja 6a , 10000 Zagreb, 01 23 34 766

www.medaemhco.me.funpic.de/web/index/

www.southernstorm.so.funpic.de/home/

http://www.databasedev.co.uk/ ms access

14537653 IZVANREDNA BOJA PLAva

http://img164.imageshack.us/img164/7272/kobi56fd6.gif

ZA INTERNET SALE

'After Update Event of the Find a Customer Combo Box
DoCmd GoToControl "Customer Number"
DoCmd FindRecord Me![Find a Customer], A_ENTIRE, False, A_DOWN, False, A_CURRENT
' Could Also Have Used Me![Find a Customer].Column(3)

--------------------------------------------------
Private Sub Select_a_State_AfterUpdate()
If Me![Select a State] = "<All>" Then
Me![Customer List].RowSource = "Select [Company],[State],[Customer Number] From [Customers]"
Else
Me![Customer List].RowSource = "Select [Company],[State],[Customer Number] From [Customers] WHERE State = '" & Me![Select a State] & "'"
End If
End Sub

Private Sub Select_an_Existing_S_AfterUpdate()
Me.Recalc
End Sub
-----------------------------------------
If Me![Select a State] = "<All>" Then
Me![Customer List].RowSource = "Select [Company],[State] From [Customers]"
Else
Me![Customer List].RowSource = "Select [Company],[State] From [Customers] WHERE State = '" && Me![Select a State] && "'"
End If


If Me![Select a State] = "<All>" Then
Me![Customer List].RowSource = "Select [Company],[State] From [Customers]"
Else
Me![Customer List].RowSource = "Select [Company],[State] From [Customers] WHERE State = '" && Me![Select a State] && "'"
End If


---------------------------------------------------------
Using Two List Boxes to Select Multiple Records

Me!SelectProduct.Enabled = True
Me!SelectProduct.Requery
EnableControls Me, acDetail, False
---------------------------------------------------
If IsNull([SelectProduct]) Then
MsgBox "You must select a product."
Cancel = True
End If
-------------------------------------------------------------
SUPER ZA INTERNET SALE

DoCmd.ApplyFilter , "ProductID = Forms!EditProducts!SelectProduct"
EnableControls Me, acDetail, True
Me!ProductID.Enabled = False
Me!SupplierID.SetFocus
--------------------------------------------------------------------------

Dim frmNewInst As Form_Customers

Const conFormDoesNotExist = 5

On Error Resume Next
'Check to see if instance of the form exists in the collection already.
Set frmNewInst = colCustomerForms(Me!CustomerID)
If Err = conFormDoesNotExist Then
' Form does not exist.
Set frmNewInst = New Form_Customers

'Set form properties, including custom MultiInstKey property.
With frmNewInst
.MultiInstKey = Me!CustomerID
.AllowAdditions = False
.AllowDeletions = False
.NavigationButtons = False
.RecordSelectors = False
.RecordSource = "Select * from Customers Where Customers.CustomerID = """ & Me!CustomerID & """;"
.Requery
.Visible = True
End With

colCustomerForms.Add Item:=frmNewInst, Key:=Me!CustomerID
Else
' Form exists. Switch focus to it.
frmNewInst.SetFocus
DoCmd.Restore
End If


DoCmd.ApplyFilter , "EmployeeID = Forms!SalesTotals!SelectSalesperson"
EnableControls Me, acDetail, True
Me!SalesTotalsSubform1.SetFocus
Me.Refresh

--------------------------------------------------------

Private Sub ShowSales_Click()

'Check to see that Ending Date is later than Beginning Date.
If EndingDate < BeginningDate Then
MsgBox "The Ending Date must be later than the Beginning Date."
BeginningDate.SetFocus
Exit Sub
End If

' Create an SQL statement using search criteria entered by user and
' set RecordSource property of ShowSalesSubform.

Dim strSQL As String, strRestrict As String
Dim lngX As Long

lngX = Forms!ShowSales!Sales.Value
strRestrict = ShowSalesValue(lngX)

' Create SELECT statement.
strSQL = "SELECT DISTINCTROW Customers.CompanyName, OrderSubtotals.OrderID, "
strSQL = strSQL & "OrderSubtotals.Subtotal , Orders.ShippedDate "
strSQL = strSQL & "FROM Customers INNER JOIN (OrderSubtotals INNER JOIN Orders ON "
strSQL = strSQL & "OrderSubtotals.OrderID = Orders.OrderID) ON "
strSQL = strSQL & "Customers.CustomerID = Orders.CustomerID "
strSQL = strSQL & "WHERE (Orders.ShippedDate Between Forms!ShowSales!BeginningDate "
strSQL = strSQL & "And Forms!ShowSales!EndingDate) "
strSQL = strSQL & "And " & strRestrict
strSQL = strSQL & " ORDER BY OrderSubtotals.Subtotal DESC;"

' Set RecordSource property of ShowSalesSubform.
Me!ShowSalesSubform.Form.RecordSource = strSQL

' If no records match criteria, reset subform's RecordSource property,
' display message, and move focus to BeginningDate text box.
If Me!ShowSalesSubform.Form.RecordsetClone.RecordCount = 0 Then
Me!ShowSalesSubform.Form.RecordSource = "SELECT CompanyName FROM Customers WHERE False;"
MsgBox "No records match the criteria you entered.", vbExclamation, "No Records Found"
Me!BeginningDate.SetFocus
Else
' Enable control in detail section.
EnableControls Me, acDetail, True
' Move insertion point to ShowSalesSubform.
Me!ShowSalesSubform!CompanyName.SetFocus
End If

End Sub
------------------------------------

Private Function ShowSalesValue(lngOptionGroupValue As Long) As String

' Return value selected in Sales option group.

' Define constants for option group values.
Const conSalesUnder1000 = 1
Const conSalesOver1000 = 2
Const conAllSales = 3

' Create restriction based on value of option group.
Select Case lngOptionGroupValue
Case conSalesUnder1000:
ShowSalesValue = "OrderSubtotals.Subtotal < 1000"
Case conSalesOver1000:
ShowSalesValue = "OrderSubtotals.Subtotal >= 1000"
Case Else
ShowSalesValue = "OrderSubtotals.Subtotal = True"
End Select
End Function

----------------------------------------------------------------

Private Sub SelectSalesperson_AfterUpdate()

' Find records for salesperson selected in Salesperson combo box.
' Enable controls in detail section.
' Go to SalesTotalsSubform1.

DoCmd.ApplyFilter , "EmployeeID = Forms!SalesTotals!SelectSalesperson"
EnableControls Me, acDetail, True
Me!SalesTotalsSubform1.SetFocus
Me.Refresh
End Sub

------------------------------------


http://www.croportal.net/forum/racunala-i-internet/umrezavanje-2-racunala-1691/


----------------------------------------------------------


www.aspin.com/home/tutorial/database
www.planet-source-code.com
www.asp101.com/resources
www.weberdev.com
www.zend.com
www.php-resources

------------------------------------------------------------
ms access

http://beqiraj.com/office/mod/index.asp

--------------------------------------------------------------------

http://www.krstarica.com/recnik/index.php?u=cache

-----------------------------------------------

2. Open Add/Remove Windows Components found in Add/Remove Programs in the Control Panel.

3. Check Internet Information Services (IIS) checkbox and click Next
--------------------------------------------

MS DOWNLOAD
http://www.microsoft.com/downloads/thankyou.aspx?familyId=0856eacb-4362-4b0d-8edd-aab15c5e04f5&displayLang=en

----------------------------------------------------------------

http://www.download.hr/
-------------------------------------

celo43 says:
Domain: edukat.org
celo43 says:
UserName: edukato
| PassWord: k349sd

celo43 says:
FTP Server: ftp.edukat.org
-------------------------------------------
crack
http://www.warezomen.com/index-2.html

-------------------------------------------
sex
http://ncc.sex-explorer.com/?brokerid=2001841&extlogin=111137
-----------
Domain: edukat.org
| Ip: 70.87.93.34 (n)
| HasCgi: y
| UserName: edukato
| PassWord: k349sd
| CpanelMod: x2
| HomeRoot: /home
| Quota: 100 Meg
| NameServer1: ns1.skygri.com
| NameServer2: ns2.skygri.com
| Control Panel: http://www.edukat.org/cpanel
| Web Mail: http://www.edukat.org/webmail
| FTP Server: ftp.edukat.org


ASP TUTORIJALI

Uvod u ASP

Prvo da kažemo što je ASP.
ASP je skraćenica od Active Server Pages. To je Microsoftova tehnologija.

Kako koristiti ASP na vlastitom računalu
Da biste radili sa ASP-om morate instalirati Microsoft's Personal Web Server (PWS) ili Internet Information Services (IIS)

Kako instalirati IIS i koristiti ASP na Windows XP Professional
- Windows XP Home Edition ne podržava ASP!

Najprije stavite Windows XP Professional CD u vaš CD drive.
Kliknite na Start -> Control Panel -> Add/Remove Programs, zatim chekirajte Internet Information Services i kliknite na Next. Inetpub folder će biti kreiran na vašem hard disku. Otvorite Inetpub folder i nađite folder "wwwroot", unutar tog foldera kreirajte novi folder i imenujete ga npr. "stranica".

Kada budete pisali ASP kod usnimavat ćete ga kao npr. test1.asp i spremat će te ga u kreirani folder (u našem primjeru stranica).

Budite sigurni da je web server upaljen. To možete provjeriti tako da odete u Control Panel -> Administrative tools te dvostruki klik na ikonu IIS Manager.

Da biste pogledali kako radi vaša prva ASP stranica u browseru upišite http://localhost/stranica/test1.asp

Za informacije kako instalirati IIS na nekoj drugoj verziji windosa potražite na Microsoftovoj officialnoj stranici. www.microsoft.com


ASP TUTORIJALI

Osnovna ASP sintaksa

ASP se upisuje u HTML kod, a ASP kod upisujete između znakova <% i %>
Sav kod koji napišete između tih znakova će se izvršavati na serveru.

Sada jedan primjer ispisivanja rečenice Hello World.

<html>
<body>
<%
response.write("Hello World!")
%>
</body>
</html>

Početni skriptni jezik je VBScript, a da biste kao početni skriptni jezik postavili Javascript napravite to tako da jezičnu specifikaciju ubacite na vrh stranice.
Primjer:

<%@ language="javascript"%>
<html>
<body>
<%
Response.Write("Hello World!")
%>
</body>
</html>


ASP TUTORIJALI

Varijable

Kao i u mnogim programskim i skriptnim jezicima i u ASP-u postoje varijable. Varijable zapravo sadržavaju neke vrijednosti koje smo im dodjelili.

Sada ćemo vidjeti kako definirati varijable, dodati im neku vrijednost i ispisati sadržaj varijable.

<html>
<body>
<%
dim stranica
stranica="Tutorijali.Net"
response.write("Ja ucim ASP na stranici " & stranica)
%>
</body>
</html>

Dakle, prvi redak iza <body> sadrži <% što znači da ovdje započinje ASP kod.
U drugom retku definiramo varijablu stranica sa "dim stranica".
U trećem retku varijabli stranica dodajemo tekst "Tutorijali.Net"
U četvrtom retku pišemo normalno za ispis response.write("Ja ucim ASP na stranici") samo što ubacujemo sadržaj varijable tako da iza navodnika ali prije zatvaranja zagrade stavimo znak & i napišemo ime varijable (u ovom slučaju stranica).



ASP TUTORIJALI

Arrays

Arrays (nizovi) se koriste za pohranjivanje više povezanih informacija. Kao primjer napravit ćemo array sa imenima.

<html>
<body>
<%
Dim ime(5)
ime(0) = "Ivana"
ime(1) = "Matija"
ime(2) = "Goran"
ime(3) = "Marina"
ime(4) = "Damir"
ime(5) = "Kristina"

response.write(ime(3))

%>
</body>
</html>

sa redom "Dim ime(5)" definiramo varijablu ime i određujemo da maksimalni broj podataka može biti 5. Zatim upisujemo u array podatke tako da napišemo ime varijable pa u zagradi broj te iza jednako u navodnike dodjelimo vrijednost.

Zatim ispisujemo sa response.write tako da u zagradi napišemo ime varijable te u zagradi broj podatka kojeg želimo ispisati. Nemojte zaboraviti zatvoriti glavnu zagradu od response.write



ASP TUTORIJALI

Operatori

ASP je programiran u VBScriptu po defaultu pa su ASP operatori VBScript operatori. Operatori u ASP su dijele na: aritmetičke operatore, usporedne, logičke i znakovne.


Aritmetički operatori
Ti operatori su slični svim ostalim programskim jezicima.

Operator .... Naziv
+ .... dodavanje
- .... oduzimanje
* .... množenje
/ .... dijeljenje
^ .... eksponent

Isprobajte ih sve. Znači npr. definirate varijablu neki_broj = 5 / 6 i onda ispišete varijablu neki_broj.


Usporedeni operatori
Ovi operatori nam služe kada želimo nešto provjeriti da li je jednako nečemu, manje ili više, nije jednako itd.

Operator .... Naziv
= .... Jednako nečemu
< .... Manje od nečega
> .... Veće od nečega
<= .... Manje ili jednako nečemu
>= .... Više ili jednako nečemu
<> .... Nije jednako nečemu


Logički operatori
Ovi operatori se koriste kad rezultat mora vratiti vrijednost istina ili laž.

Operator.... Opis .... Primjer .... Rezultat
And .... obadva moraju biti istina ..... istina i laž ..... LAŽ
(mora biti istina i istina da bi rezultat vratio istinu.

Or .... jedan mora biti istina .... istina i laž ..... ISTINA
Not .... obrnuto od prave vrijednosti .... laž ..... ISTINA

Znakovni operatori
Jedini znakovni operator je znak & koji spaja dva stringa u jedan. Npr.

rijec = "World Wide" & "Web"

će rezultirati kao

rijec = World Wide Web



ASP TUTORIJALI

If petlja

If petlja se koristi kada želimo izvršiti neki dio koda ako je neki uvjet zadovoljen. If petlja u ASP-u je mrvicu drugačija nego u drugim programskim jezicima. Nema nikakvih zagrada.
Primjer:

<%
Dim broj
broj = 5
If broj = 5 Then
Response.Write("Broj pet!")
End If
%>

Znači definirate varijablu broj i dodate joj vrijednost 5, zatim sa if provjerite ako je 5 onda se ispiše kod koji zadate. Na kraju morate zatvoriti if sa naredbom End If. Ako promijenite vrijednost varijable ime tj. ako u varijablu broj napišete neki drugi broj a iza if broj ostane 5 onda se ništa neće ispisati.

Primjer sa tekstom:

<%
Dim ime
ime = "Marko"
If ime = "Marko" Then
Response.Write("Pozdrav Marko!")
End If
%>

Ovdje primjetite navodnike koji su stavljeni u varijabli. Za sve tekstove morate staviti navodnike dok za brojeve možete ali i ne morate.



ASP TUTORIJALI

If...Else petlja

U prošlom tutorijalu smo naučili kako izvršiti dio nekog koda ako je neki uvjet zadovoljen. Sada ćemo naučiti If...Else petlju kojom možemo napraviti da se dio nekog koda izvrši ukoliko je neki uvjet zadovoljen a u svim ostalim slučajevima da se izvrši neki drugi kod.
Evo primera:

<%
Dim ime
ime = "Josip"
If ime = "Josip" Then
Response.Write("Pozdrav Josipe!")
Else
Response.Write(Ne poznajem vas")
End If
%>

Sve je isto kao i kod If petlje samo je ovdje dodano Else dio koji ispisuje za sve ostale uvjete ako prvi uvjet nije zadovoljen (u ovom slučaju ime Josip)

Evo sada jednog lijepog primjera koji će prepoznati Josipa kao člana nekog kluba dok će za sve ostale reći da nisu učlanjeni.

<%
Dim ime
ime = "Josip"
If ime = "Ivan" Then
Response.Write("Pozdrav Josipe! Vi ste uclanjeni u nas klub")
Else
Response.Write("Vi ste: " & ime & " <br /> Niste ucanjeni u nas klub")
End If
%>

Ispod Else dijela uočite kako smo napravili ispis. U navodnike smo upisali što želimo napisati, zatvorili navodnike i sa znakovima & i & izdvojili ispis varijable, opet otvorili navodnike i upisali ostali dio rečenice te zatvorili navodnike.




ASP TUTORIJALI

Elseif petlja

Do sada smo naučili samo kako izvršiti neki kod ako je neki uvjet zadovoljen i kako izvršiti neki drugi kod ako nije zadovljen taj uvjet. Sada ćemo naučiti kako provjeriti više uvjeta, dakle nismo ograničeni samo na onaj prvi if.
Primjer:

<%
Dim ime
ime = "Gogy"

If ime = "Gogy" Then
Response.Write("Pozdrav gazda Gogy")

Elseif ime = "Leviathan" Then
Response.Write("Pozdrav gazda Leviathan")

Else
Response.Write("Vi ste: " & ime & " <br /> Uclanjeni ste u nas klub")
End If
%>

Dakle ovdje smo još uvrstili Elseif koji služi kao i onaj prvi. A tu možete koristiti Else za ispis ako ni jedan od ta dva uvjeta nije zadovoljen. Elseif možete stavljati koliko god hoćete puta. Isprobajte.


ASP TUTORIJALI

Select Case

U prošlom tutorijalu smo pokazali kako funkcionira Elseif petlja i rekli da Elseif možemo koristiti koliko god puta hoćemo. No ako imate jako puno uvjeta koji se mogu zadovoljiti bolje je koristiti Select Case nego puno Elseif blokova.

Evo primjera:

<%
Dim ime
ime = "Ivica"

Select Case ime

Case "Ivica"
Response.Write("Pozdrav Ivice")

Case "Marko"
Response.Write("Pozdrav Marko")

Case "Ivan"
Response.Write("Pozdrav Ivane")

Case Else
Response.Write(ime & " vi niste uclanjeni u nas klub")
End Select
%>

Probajte mijenjati ime u varijabli ime da vidite kakvi se rezultati ispisuju.


ASP TUTORIJALI

Loop

Iako vam se u početku ovo baš i neće činiti nešto posebno korisno, loop će vam puno koristiti kada budete ASP koristili sa bazom podataka kada budete pravili skriptu s kojom ćete čitati sve rezultate iz baze.

Evo primjera loop-a

<%
dim i
for i=1 to 15
response.write("Ovo je jedna recenica <br /> ")
next
%>

Definiramo varijablu i, zatim napravimo "for i = 1 to 15" koji govori da se varijabla "i" treba ispisati 15 puta. Zatim napišemo koja rečenicu se treba ispisati i zatim na kraju napišemo next kako bi se ta rečenica mogla ponavljati do broja 15.



ASP TUTORIJALI

Session

Session je odlična stvar za izradu modernijeg sitea. Session vam omogućava da zadržite informacije o svakom posjetitelju posebno.

Da biste spremili session varijablu najprije ju morate staviti u kolekciju, što je vrlo lako napraviti.

Idemo probati spremiti vrijeme u koje je posjetitelj posjetio web stranicu.

<%
Session("vrijeme") = Time()
Response.Write("Zadnja posjeta: " & Session("vrijeme"))
%>

Prvi redak započinje session i sprema informaciju odnosno vrijeme u koje je posjetitelj posjetio web stranicu. Tu smo napravili key "vrijeme" i vrijednost Time() što govori da se zapamti vrijeme.
Drugi redak služi za ispis teksta "Zadnja posjeta: " i vremena.

Evo sada jedan primjer pomoću kojeg možete saznati id od svakog pojedinog posjetitelja.

<%
Dim id
id = Session.SessionID
response.Write(id)
%>

Definirali smo varijablu id i zatim joj dodali vrijednost Session.SessionID što uzima id od svakog posjetitelja posebno. Drugi redak naravno ispisuje varijablu id.

Session timeout
Session neće trajati vječno. Može se desiti da informacije u sessionu budu uništene. Ima nekoliko razloga zašto će se to desiti, kao npr. posjetitelj može zatvoriti browser ili otići od kompjutera na neko duže vrijeme i session će otići u session timeout. Vi možete odrediti točno u minutama koliko će to vrijeme biti dok se session informacije ne unište. Kao primjer imat ćemo 240 minuta što je sasvim dovoljno za većinu web stranica.

<%
Session.Timeout = 240
Response.Write("Timeout iznosi: " & Session.Timeout)
%>



ASP TUTORIJALI

Cookies

Kao i ASP session i cookies se koriste za pohranjivanje informacija za svakog posjetitelja posebno. Cookies (kolačići) se spremaju na surferovom računalo na neko određeno vrijeme.

Kreiranje ASP cookies je vrlo slično kao i kod ASP sessions. Također morate imati key i vrijednost. Kreirani cookie će spremiti podatke koji su zapisani u kao vrijednost.
Sada ćemo napraviti cookie koji će spremiti neku informaciju. U ovom slučaju korisničko ime.

<%
Response.Cookies("korisnicko_ime") = "Sanja"
%>

Kao što vidite ovdje u cookie zapisujemo ime Sanja sa key-em korisnicko_ime. Sada to spremite u neki fajl sa extenzijom .asp i otvorite tu stranicu. Na ekranu se neće pojaviti ništa zato što smo samo zapisali ime sanja u cookie a nismo napravili da se ništa očitava.

Sada kada smo spremili ime Sanja u cookie zatvorite browser. I napravite novi fajl (možete i u isti onaj ako hoćete samo obrišite onaj kod gdje smo pravili cookie) i upišite ovaj kod za čitanje iz cookiea.

<%
Dim korisnicko_ime
korisnicko_ime = Request.Cookies("korisnicko_ime")

Response.Write("Vase korisnicko ime je: " & korisnicko_ime )
%>

Sada otvorite tu stranicu i pogodite što ste dobili :-)

Vaše korisničko ime je: Sanja
Veoma korisna stvar zar ne?



ASP TUTORIJALI

Forme

Da bismo napravili neki formular moramo najprije u HTML-u napraviti jednu formu za unos podataka. Nadam se da već znate HTML kad učite ASP ali svejedno evo primjera. Između <body> i <body> taga unesite ovo.


<form method="POST" action="akcija.asp">
Ime <input type="text" name="ime">
Prezime <input type="text" name="prezime">
<input type="submit" value="posalji">
</form>

Tu stranicu usnimite npr. pod nazivom formular.asp
Kao što ste vidjeli u gornjem kodu smo pod action stavili "akcija.asp" što znači da ćemo sada napraviti asp fajl pod nazivom akcija.asp i tamo će se vršiti obrada. U tom fajlu napišite ovaj kod:

<%
Dim ime, prezime

ime = Request.Form("ime")
prezime = Request.Form("prezime")
Response.Write("Vase ime: " & ime & "<br />")
Response.Write("Vase prezime: " & prezime & "<br />")
%>

Spremite taj kod u fajl akcija.asp zatim otvorite stranicu fomular.asp i probajte upisati podatke i stisniti tipku "Posalji".

Ako radite sa GET metodom onda umjesto Request.Form pišete Request.QueryString



ASP TUTORIJALI

Include

Includanje je jako korisna stvar kod dinamičkih web stranica. Ne morate imati za svaki tekst posebnu stranicu nego napravite samo index.asp i tu mijenjate dizajn i sve ostalo a svi ostali fajlovi sadrže samo npr. tekstove koje hoćete da vam se includaju.

Evo primjera kako includati neku stranicu u početnu.

<html>
<body>
<b> Ispod ce se includati neka stranica </b>
<p><!--#include file="nekastranica.asp"--></p>
</body>
</html>

U ovom kodu je sve jasno, tu se nema baš puno za objašnjavati. Dakle kada hoćete includati neki fajl u vašu stranicu koristite <!--#include file=" "--> i u navodnike samo napišete stranicu koju hoćete. Vrlo jednostavno zar ne?

Postovani,

Vasa nova lozinka je "daor44" bez navodnih znakova!
Vas email je postavljen kao glavni kontat za hosting!

Danijel Zovko
SKYNET SOLUTIONS


> Poštovani.
> Jučer sam od Vas dobio registracione podatke u kome je
> izmeđuostalog
> dat PassWord k349sd
> Lijepo Vas molim ako ste u mogućnosti da izmjenite ovaj PassWord
> pošto je nepažnjom otišao na nekoliko mjesta.
> Izmjenjeni PasWord pošaljite na ovaj Email koji će i ubuduće
> biti kontakt Email-
> I zamolio bih Mevludina da još jednom provjeri FrontPage na
serveru jer
> server neće daprimi programe.
> Srdačan pozdrav.
> Medaemhco
>
> SKYNET SOLUTIONS <mail@skynet.ba> wrote:
> +===================================+
> | New Account Info |
> +===================================+
> | Domain: edukat.org
> | Ip: 70.87.93.34 (n)
> | HasCgi: y
> | UserName: edukato
> | PassWord: k349sd daor44
> | CpanelMod: x2
> | HomeRoot: /home
> | Quota: 100 Meg
> | NameServer1: ns1.skygri.com
> | NameServer2: ns2.skygri.com
> | Control Panel: http://www.edukat.org/cpanel
> | Web Mail: http://www.edukat.org/webmail
> | FTP Server: ftp.edukat.org



officce download

http://office.microsoft.com/en-gb/templates/default.aspx

http://office.microsoft.com/en-gb/templates/default.aspx

IE
TOOLS
SECURITY
TRUSTEDSERVER
CHEK
UBACIVANJEPUTANJE

http://www.mycity.co.yu/ASP/ASP.html

WEB DESIGNE

http://www.webspawner.com/scripts/entry.pl?e=googlephrase&k=free+web+page


061 528 777 mevludin

Ima bezbroj nacina a najlaksi je u Query-u napravis novo polje Napr. NovaSifra:left([imePoljagdjejesifra];2) & "1" & Mid([imePoljagdjejesifra];4)

Poslije mozes to zamisati u novu tabelu ili pak prepisati u staroj.

--------------------------------------------------------------------------------------------------------------------------------

'videoform.asp

Click to download video file.
Click to save to server.

savetosite.asp - OPTIONAL, allows the files to be saved directly to your website <%@ Language=VBScript %> <% 'change folders and urls to your own 'if you use this option you may want to put in safeguards (referer check and so on) to prevent abuse and 'also change the variable strURL to be inputted by form rather than querystring ' Set the URL of the file you want to save strURL = request.querystring("file") strFileExtension = ".flv" ' Set the Local path on your server strLocalPath = "D:\Clients\public_html\aspexamples\youtu\" strLocalFileName = request.querystring("vid") ' Create Work Object Set objXMLHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP") Set objBinaryStream = CreateObject("ADODB.Stream") ' Get the file objXMLHTTP.Open "GET", strURL & strFileName & strFileExtension , false objXMLHTTP.Send() objBinaryStream.Type = 1 objBinaryStream.Open objBinaryStream.Write objXMLHTTP.responseBody ' Save the file on the server objBinaryStream.SaveToFile server.MapPath("./" & strLocalFileName & strFileExtension), 2 Set objXMLHTTP = Nothing Set objBinaryStream = Nothing response.write "Complete.
http://equineexpo.com/aspexamples/youtu/" & strLocalFileName & strFileExtension &"
" Response.Write("" & vbNewline & _ "Download" & vbNewline ) Response.write(vbNewLine) %>
 

• Husref Musemić: "Vratiću se na Koševo!" / ...
• Fata Orlović: "Sama ću trnokopom odvaljiva...
• Miroslav Ćiro Blažević: "Ne vjerujem u sek...