Dois dias atrás, fiz um artigo publicando um programa para um site (www.cfsoft.com.cn).
1. A estrutura da tabela xxfb é a seguinte:
Tipo de tipo, usado no meu site para distinguir várias colunas, tenho uma tecnologia e uma notícia.
Título da página de Pagetital
Palavras -chave Página -chave da página
Descrição na página de descrição Mata
Título do artigo do Doctitle
Conteúdo do artigo da DOCTEXT
O tempo de liberação
Código de classificação OrderId
É a rotulagem de comdend como um artigo recomendado
Segundo, cada tipo define uma lista de nomes de list_ plus, uma página do modelo de artigos de nomes temp_ mais do tipo.
3. A seguir, é apresentado uma página estática que gera o programa principal:
| A seguir, o conteúdo de referência: Se TRIM (solicitação (sinalizador)) = Build então '--- Gere Directory ------ SQL = Selecione Tipo Distit de XXFB Set objrs = const.execute (sql) Enquanto não objrs.eof url = siteurl &/admin/list_ & trim (objrs (tipo)) & Definir http = server.createObject (msxml2.xmlHttp) Http.open get, url, falso Http.send () set objStream = server.createObject (adodb.stream) objstream.type = 1 objstream.open objstream.write http.Responsebody Objstream.savetofile server.mappath (/& trim (objrs (type)) &/& trim (objrs (type)) &. Htm, 2 objstream.close Definir objstream = nada objrs.movenext Wend Definir objrs = nada Sql = selecione * de XXFB Order by thedate Desc Set objrs = const.execute (sql) Enquanto não objrs.eof Url = siteurl &/admin/temp_ & trim (objrs (tipo) &. Definir http = server.createObject (msxml2.xmlHttp) Http.open get, url, falso Http.send () set objStream = server.createObject (adodb.stream) objstream.type = 1 objstream.open objstream.write http.Responsebody Objstream.savetofile server.mappath (/& trim (objrs (type)) &/& trim (objrs (id) &. Htm), 2 objstream.close Definir objstream = nada objrs.movenext Wend Response.write gera um sucesso estático na página da web! Final se |