Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

gpassarelli

Unir valor de um request.

Por , em ASP Clássico

Recommended Posts

gpassarelli    1

gpassarelli
Postado

Galera eh o seguinte...Eu to usando um codigo pra fazer assim:

Ele vai...le a planilha excel...e exibe os dados de cada linhas e tal...td certin...

Ae soh q oq eu quero eh o seguinte.

Eu to com o codigo assim:

id = request("id")  Set CriaPlanilha = Server.CreateObject("excel.application")  CriaPlanilha.Workbooks.Open("C:\Inetpub\wwwroot\excel\"&id&".xls")
Ae oq eu to fazendo.

Eu do um request ID pra determinar o nome da planilha pra ser aberta.

Soh oq eu quero eh...

Q tenha como eu colocar mais de uma ID na consulta e ele busque nos arquivos diferentes.Tipo assim se o meu request ID vier com 1 e 2 vamo supor ele vai ler do planilha 1.xls primeiro dps passa pra 2 e assim por diante...e vai exibindo o dado de cada uma delas...

Entenderam?

O codigo inteiro tah assim:

<%id = request("id")   '**** Ler Arquivo Excel     'Instanciar objeto  Set CriaPlanilha = Server.CreateObject("excel.application")   'Abrir o arquivo especificado  CriaPlanilha.Workbooks.Open("C:\Inetpub\wwwroot\excel\"&id&".xls")   Modelo = CriaPlanilha.cells(2,2).valueReceiver = CriaPlanilha.cells(3,2).valueWaypoints = CriaPlanilha.cells(4,2).valueRoutes = CriaPlanilha.cells(5,2).valueDatabaseMaps = CriaPlanilha.cells(6,2).valueAdditionalmap = CriaPlanilha.cells(7,2).valueBatteryLife = CriaPlanilha.cells(8,2).valueDisplaySz = CriaPlanilha.cells(9,2).valueDisplayTyp = CriaPlanilha.cells(10,2).valueAreaCalculation = CriaPlanilha.cells(11,2).valueDisplayResolution = CriaPlanilha.cells(12,2).valueStandardGPS = CriaPlanilha.cells(13,2).valueTracBackMde = CriaPlanilha.cells(14,2).valueTracklogPts = CriaPlanilha.cells(15,2).valueUnitWeight = CriaPlanilha.cells(16,2).valueAudibleAlarms = CriaPlanilha.cells(17,2).valueWaterproofStandard = CriaPlanilha.cells(18,2).valueUnitDimensions = CriaPlanilha.cells(19,2).valueThumbStick = CriaPlanilha.cells(20,2).valueBacklitDisplay = CriaPlanilha.cells(21,2).valueExtAntHookup = CriaPlanilha.cells(22,2).valueWAASEGNOScapability = CriaPlanilha.cells(23,2).valueLoranTD = CriaPlanilha.cells(24,2).valueMGRSposition = CriaPlanilha.cells(25,2).valueElectronicCompass = CriaPlanilha.cells(26,2).valueBarometricAltimeter = CriaPlanilha.cells(27,2).valueHuntingFishing = CriaPlanilha.cells(28,2).valueCelestialInformation = CriaPlanilha.cells(29,2).valueProximityWaypoints = CriaPlanilha.cells(30,2).valueBuiltcalendar = CriaPlanilha.cells(31,2).valueVoltageRange = CriaPlanilha.cells(32,2).valueWaypointIcons = CriaPlanilha.cells(33,2).value       'Fechar o excel  CriaPlanilha.Quit     '**** Fim ****%></b><style type="text/css"><!--body,td,th {	font-family: Verdana, Arial, Helvetica, sans-serif;	font-size: 12px;}--></style></head><body>1-<b><%= Modelo%></b><br />2-<b><%= Receiver%></b><br />3-<b><%= Waypoints%></b><br />4-<b><%= Routes%></b><br />5-<b><%= DatabaseMaps%></b><br />6-<b><%= Additionalmap%></b><br />7-<b><%= BatteryLife%></b><br />8-<b><%= DisplaySz%></b><br />9-<b><%= DisplayTyp%></b><br />10-<b><%= AreaCalculation%></b><br />11-<b><%= DisplayResolution%></b><br />12-<b><%= StandardGPS%></b><br />13-<b><%= TracBackMde %></b><br />14-<b><%= TracklogPts%></b><br />15-<b><%= UnitWeight%></b><br />16-<b><%= AudibleAlarms%></b><br />17-<b><%= WaterproofStandard%></b><br />18-<b><%= UnitDimensions %></b><br />19-<b><%= ThumbStick%></b><br />20-<b><%= BacklitDisplay%></b><br />21-<b><%= ExtAntHookup%></b><br />22-<b><%= WAASEGNOScapability%></b><br />23-<b><%= LoranTD%></b><br />24-<b><%= MGRSposition%></b><br />25-<b><%= ElectronicCompass%></b><br />26-<b><%= BarometricAltimeter%></b><br />27-<b><%= HuntingFishing%></b><br />28-<b><%= CelestialInformation%></b><br />29-<b><%= ProximityWaypoints%></b><br />30-<b><%= Builtcalendar%></b><br />31-<b><%= VoltageRange%></b><br />32-<b><%= WaypointIcons%></b><br /></body>

Compartilhar este post

Link para o post
Compartilhar em outros sites

jrcardozo    4

jrcardozo
Postado

então seu id pode ter 1 ou mais arquivos?se é isso transforme o id em array e faça um for em cada um

Compartilhar este post

Link para o post
Compartilhar em outros sites

jothaz    1

jothaz
Postado

Camarada,você ja pensou em criar um session ou variável com conteúdo array e colocar os nomes de arquivo lá. Ai é só fazer um loop e buscar todos os arquivos.Agora isto depende de como estes arquivos são passado para você. Form, querystring ou session?t+

Galera eh o seguinte...Eu to usando um codigo pra fazer assim:Ele vai...le a planilha excel...e exibe os dados de cada linhas e tal...td certin...Ae soh q oq eu quero eh o seguinte.Eu to com o codigo assim:

id = request("id")  Set CriaPlanilha = Server.CreateObject("excel.application")  CriaPlanilha.Workbooks.Open("C:\Inetpub\wwwroot\excel\"&id&".xls")
Ae oq eu to fazendo.Eu do um request ID pra determinar o nome da planilha pra ser aberta.Soh oq eu quero eh...Q tenha como eu colocar mais de uma ID na consulta e ele busque nos arquivos diferentes.Tipo assim se o meu request ID vier com 1 e 2 vamo supor ele vai ler do planilha 1.xls primeiro dps passa pra 2 e assim por diante...e vai exibindo o dado de cada uma delas...Entenderam?O codigo inteiro tah assim:
<%id = request("id")   '**** Ler Arquivo Excel     'Instanciar objeto  Set CriaPlanilha = Server.CreateObject("excel.application")   'Abrir o arquivo especificado  CriaPlanilha.Workbooks.Open("C:\Inetpub\wwwroot\excel\"&id&".xls")   Modelo = CriaPlanilha.cells(2,2).valueReceiver = CriaPlanilha.cells(3,2).valueWaypoints = CriaPlanilha.cells(4,2).valueRoutes = CriaPlanilha.cells(5,2).valueDatabaseMaps = CriaPlanilha.cells(6,2).valueAdditionalmap = CriaPlanilha.cells(7,2).valueBatteryLife = CriaPlanilha.cells(8,2).valueDisplaySz = CriaPlanilha.cells(9,2).valueDisplayTyp = CriaPlanilha.cells(10,2).valueAreaCalculation = CriaPlanilha.cells(11,2).valueDisplayResolution = CriaPlanilha.cells(12,2).valueStandardGPS = CriaPlanilha.cells(13,2).valueTracBackMde = CriaPlanilha.cells(14,2).valueTracklogPts = CriaPlanilha.cells(15,2).valueUnitWeight = CriaPlanilha.cells(16,2).valueAudibleAlarms = CriaPlanilha.cells(17,2).valueWaterproofStandard = CriaPlanilha.cells(18,2).valueUnitDimensions = CriaPlanilha.cells(19,2).valueThumbStick = CriaPlanilha.cells(20,2).valueBacklitDisplay = CriaPlanilha.cells(21,2).valueExtAntHookup = CriaPlanilha.cells(22,2).valueWAASEGNOScapability = CriaPlanilha.cells(23,2).valueLoranTD = CriaPlanilha.cells(24,2).valueMGRSposition = CriaPlanilha.cells(25,2).valueElectronicCompass = CriaPlanilha.cells(26,2).valueBarometricAltimeter = CriaPlanilha.cells(27,2).valueHuntingFishing = CriaPlanilha.cells(28,2).valueCelestialInformation = CriaPlanilha.cells(29,2).valueProximityWaypoints = CriaPlanilha.cells(30,2).valueBuiltcalendar = CriaPlanilha.cells(31,2).valueVoltageRange = CriaPlanilha.cells(32,2).valueWaypointIcons = CriaPlanilha.cells(33,2).value       'Fechar o excel  CriaPlanilha.Quit     '**** Fim ****%></b><style type="text/css"><!--body,td,th {	font-family: Verdana, Arial, Helvetica, sans-serif;	font-size: 12px;}--></style></head><body>1-<b><%= Modelo%></b><br />2-<b><%= Receiver%></b><br />3-<b><%= Waypoints%></b><br />4-<b><%= Routes%></b><br />5-<b><%= DatabaseMaps%></b><br />6-<b><%= Additionalmap%></b><br />7-<b><%= BatteryLife%></b><br />8-<b><%= DisplaySz%></b><br />9-<b><%= DisplayTyp%></b><br />10-<b><%= AreaCalculation%></b><br />11-<b><%= DisplayResolution%></b><br />12-<b><%= StandardGPS%></b><br />13-<b><%= TracBackMde %></b><br />14-<b><%= TracklogPts%></b><br />15-<b><%= UnitWeight%></b><br />16-<b><%= AudibleAlarms%></b><br />17-<b><%= WaterproofStandard%></b><br />18-<b><%= UnitDimensions %></b><br />19-<b><%= ThumbStick%></b><br />20-<b><%= BacklitDisplay%></b><br />21-<b><%= ExtAntHookup%></b><br />22-<b><%= WAASEGNOScapability%></b><br />23-<b><%= LoranTD%></b><br />24-<b><%= MGRSposition%></b><br />25-<b><%= ElectronicCompass%></b><br />26-<b><%= BarometricAltimeter%></b><br />27-<b><%= HuntingFishing%></b><br />28-<b><%= CelestialInformation%></b><br />29-<b><%= ProximityWaypoints%></b><br />30-<b><%= Builtcalendar%></b><br />31-<b><%= VoltageRange%></b><br />32-<b><%= WaypointIcons%></b><br /></body>

Compartilhar este post

Link para o post
Compartilhar em outros sites

gpassarelli    1

gpassarelli
Postado

Galera ainda soh iniciante em asp...Entao assim...jonathandj sim pode ser mais de um...aecomo q eu faria isso q você tah falando:

transforme o id em array e faça um for em cada um

E jothaz o valor das ID vem atravez de um form q manda os dados pra fazer o request.Como eu posso fazer isso:

criar um session ou variável com conteúdo array e colocar os nomes de arquivo lá.Ai é só fazer um loop e buscar todos os arquivos.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito