Ir para o conteúdo
powerPT

Transformar código vb em c#

Mensagens Recomendadas

powerPT    0
powerPT

Gostava de transformar isto que está em vb:

Request.ServerVariables("HTTP_HOST")&Left(Request.ServerVariables("URL"), InStrRev(Request.ServerVariables("URL"),"/"))

em C#!

começando temos Request.ServerVariables["HTTP_HOST"] e o resto...? As funções utilizadas e o demais conteúdo não estou a ver como equivale ao C#  :dontgetit:

O que isto faz é ir buscar o url certo, não só o dominio mas também pastas em que a página esteja.

Uma ajudita...

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
Tiago Salgado    2
Tiago Salgado

Isso assim por alto vais ter q ter algo do genero:

Request.ServerVariables["HTTP_HOST"] + Request.ServerVariables["URL"].Substring(0,Request.ServerVariables["URL"].LastIndexOf("/"));

Não testei... por isso pode ser q tenhas de fazer algum ajuste.

Cumps

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
powerPT    0
powerPT

Isso funciona...mal  :P

Vejamos, tenho uma masterpage, se as paginas estiveres no directorio principal tudo bem, se estiverem em algum secundário esquece porque fica tipo:

http://localhost:49496/Livraria/admin/images/teste1.jpg

o caminho correcto seria

http://localhost:49496/Livraria/images/teste1.jpg

:wallbash:

Alguma maneira para resolver a cena?

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
Tiago Salgado    2
Tiago Salgado

Já foi resolvido.

Dim link As String = Page.Request.Url.AbsoluteUri
Dim path As String = Page.Request.Url.AbsolutePath
Dim dir As String = path.Substring(1, path.IndexOf("/", 1))
Dim absurl As String = link.Substring(0, link.IndexOf(dir)) + dir
Response.Write(absurl)

Ou

Dim absurl As String = Page.Request.Url.AbsoluteUri.Substring(0, Page.Request.Url.AbsoluteUri.IndexOf(Page.Request.Url.AbsolutePath.Substring(1, Page.Request.Url.AbsolutePath.IndexOf("/", 1)))) + Page.Request.Url.AbsolutePath.Substring(1, Page.Request.Url.AbsolutePath.IndexOf("/", 1))
Response.Write(absurl)

Cumps

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
Saco    0
Saco

Já foi resolvido.

Dim link As String = Page.Request.Url.AbsoluteUri
Dim path As String = Page.Request.Url.AbsolutePath
Dim dir As String = path.Substring(1, path.IndexOf("/", 1))
Dim absurl As String = link.Substring(0, link.IndexOf(dir)) + dir
Response.Write(absurl)

Ou

Dim absurl As String = Page.Request.Url.AbsoluteUri.Substring(0, Page.Request.Url.AbsoluteUri.IndexOf(Page.Request.Url.AbsolutePath.Substring(1, Page.Request.Url.AbsolutePath.IndexOf("/", 1)))) + Page.Request.Url.AbsolutePath.Substring(1, Page.Request.Url.AbsolutePath.IndexOf("/", 1))
Response.Write(absurl)

Cumps

ou em C#... :thumbsup:

(não testado)

string link = Page.Request.Url.AbsoluteUri;
string path = Page.Request.Url.AbsolutePath;
string dir = path.Substring(1,path.IndexOf("/",1));
string absurl = link.Substring(0,link.IndexOf(dir))+dir;
Response.Write(absurl);

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
GatoVsPinguim    0
GatoVsPinguim

Apesar das conversões não serem nada do outro mundo, eis uma dica:

Existe uma plataforma, SharpDevelop que converte e gera código entre o VB.NET e o C#.NET.  :)

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade