Recomendado: uma função prática de paginação asp Compartilhe uma função de paginação asp, parece muito bom. A visão é mostrada na figura: você pode modificá -la de acordo com sua própria situação. Código: % 'xie liang repara o programa de paginação'call pageControl (registros totais, número total da página, página atual) SubControl (ICOUNT, PageCount, Page) Response.Write (Style Type = Text/CSS/*Xie Liang Paginação CSS*/Div.Pager {Padding: 10px
Um modelo usa o componente de upload do arquivo ASP para fazer upload de um arquivo no servidor para determinar se o tamanho do arquivo excede o tamanho especificado. Este exemplo fala sobre o componente upload_5xsoft de upload de arquivos. File.Filesize> 10000000 pode limitar o número de arquivos K a.
Dim Upload, Arquivo, FormName, FormPath, ICOUNT, nome do arquivo, FileExt
Configurar upload = new upload_5xsoft 'Criar objeto de upload
Formath = download/ 'add (/) após o diretório
Se certo (formath, 1) <>/ então formath = formath &//
Para cada nome de formulário no upload.File ', todos os arquivos enviados
set file = upload.file (formname) 'gerar um objeto de arquivo
Se File.Filesize> 1000000 Então
mensagem = 1
else 'se o tamanho do arquivo <20000 significa que há dados de arquivo
fileExt = lcase (direita (file.filename, 4))
se fileext <>. Exe e FileExt <>. Zip e FileExt <>. rar e fileExt <>.
mensagem = 2
outro
randomizar
rannum = int (90000*rnd) +10000
FileName = FormPath & Lemongtree_ & Year (agora) e mês (agora) & Day (agora) & Hour (agora) & Minute (agora) & Second (agora) & Rannum & FileExt
file.saveas server.mappath (nome do arquivo) 'Salvar arquivo
se fileext = .zip então
UPLOPLETYPE = ZIP
elseif fileExt = .Rar então
uploadType = rar
elseif fileExt = .mxp então
UPLOPLETYPE = MXP
elseif fileExt = .exe então
uploadType = exe
final se
uploadchar = nome do arquivo
tamanho = clng (file.filesize)/1000
mensagem = 3
final se
final se
próximo
%>
<% se mensagem = 1 então%>
<html>
<head>
<título> O tamanho excede o padrão </title>
<meta http-equiv = content-type content = text/html; charset = gb2312>
<Script Language = Web Page Efeitos>
função error_size ()
{
alerta (o tamanho do arquivo excede 1000kb, seleção.);
window.Location = upload.asp;
}
</script>
</head>
<corpo bgcolor =#f2f2f2 leftMargin = 0 topMargin = 0 onLoad = error_size ()>
</body>
</html>
<% elseif Mensagem = 2 então%>
<html>
<head>
<title> tipo Incompatch </ititle>
<meta http-equiv = content-type content = text/html; charset = gb2312>
<idioma do script = javascript>
função error_type ()
{
Alerta (apenas envie arquivos ZIP/RAR/EXE/MXP N, selecione o tipo de arquivo correto!);
window.Location = upload.asp;
}
</script>
</head>
<corpo bgcolor =#f2f2f2 leftMargin = 0 topMargin = 0 onLoad = error_type ()>
</body>
</html>
<% elseif Message = 3 então%>
<html>
<head>
<title> enviado com sucesso </ititle>
<meta http-equiv = content-type content = text/html; charset = gb2312>
<idioma do script = javascript>
function image_success ()
{
alerta (upload de arquivo com sucesso!);
parent.form1.url1.value = < %= uploadChar %>
parent.form1.size.value = <%= size%> k
window.Location = upload.asp;
}
</script>
</head>
<corpo bgcolor =#f2f2f2 leftMargin = 0 topMargin = 0 onLoad = image_success ()>
</body>
</html>
< % final se %>
<%
Definir arquivo = nada
Configurar upload = nada '' Exclua este objeto
%>
Compartilhar: Recursos e Funções da Produção de Site ASP Language ASP (abreviação da página do servidor ativo) significa a página da web do servidor ativo. ASP é um aplicativo desenvolvido pela Microsoft para substituir os programas de script CGI. Ele pode interagir com bancos de dados e outros programas e é uma ferramenta de programação simples e conveniente. O formato do arquivo de página da Web da ASP é .asp e agora é comumente usado em vários sites dinâmicos. ASP é um ambiente de script do lado do servidor que pode ser usado