15 svar · 397 visningar · startad av Meng
Tjena goddag hallå, nu har jag suttit här och letat och letat igenom forumet efter hjälp med att öppna en wordfil utanför IE´s fönster. Detta har jag också lyckats med! och koden som behövdes var denna:
<HTML>
<HEAD>
<SCRIPT LANGUAGE=VBScript>
Dim objWord
Sub Btn1_onclick()
call OpenDoc("file:///R:/Teknisk%20dokumentation%20930.xxx/test.doc")
End Sub
Sub OpenDoc(strLocation)
Set objWord = CreateObject("Word.Application")
objWord.Visible = true
objWord.Documents.Open strLocation
End Sub
</SCRIPT>
<TITLE>Launch Word</Title>
</HEAD>
<BODY>
<INPUT TYPE=BUTTON NAME=Btn1 VALUE="Open Word Doc">
</BODY>
</HTML>
Detta funkar också fin fint och jag vill lägga in det i min dokument databas, där fick jag lite problem.
Måste själva VB scriptet ligga inom <HEAD> taggarna?
sen vill jag gärna kunna skriva
call OpenDoc("file:///R:/Teknisk%20dokumentation%20930.xxx/<%=dokumenter("navn")%>")
Så man direkt i dokument indexet kan välja att öppna filen direkt i word och den dynamiskt fattar vilken fil det är.
Kan man göra en lite "if" funtion så att detta bara går när de sista 3 bokstäverna är doc i "navn" och en "else" för om det är allting annat så ska den öppnas via en vanlig "href".
Hur skulle isåfall en sånn funtion se ut?
Nu blev det mkt på en gång men ni kanske kan hjälpa? jag är mkt taksamm för hjälp iaf.
Äsh ingen som ville svara på det märker jag, jag har iaf löst problemet med att få VB scrpitet till att funka på sidan.
Hur gör jag om jag vill ha en funtion som ser ut så här
If 'de sista 3 bokstäverna i "navn" matchar "doc"' then
Response.Write "<a href="word.asp?id=<%=dokumenter("id")%>" target="content"><%=dokumenter("navn")%></a>"
Else
Response.Write "<a href="R:\Teknisk dokumentation 930.xxx\<%=dokumenter("navn")%>" target="_new"><%=dokumenter("navn")%></a>"
End If
Känns som jag snackar med mig själv =)
Nu har jag funtionen, men den funkar inte. Alltså när det är ett dokument med sissta 4 ".doc" så skriver den ändå det som står på Else varför?
<%If Right(RS("navn"), 4) = ".doc" then%>
<INPUT TYPE=IMAGE src="../include/images/OpenWord_up.gif" NAME=Btn1 alt="Åbn i Microsoft Word" border="0" style="height: 34px; Width: 191 px"><br>
<%Else%>
Yada Yada
<%End If%>
skriv ut Right(rs("navn"),4) i else-delen ?
Jag får det feean inte att funka ändå allså samma resultat när jag väljer en .pdf eom .doc
<%If Right(RS("navn"), 4) <> ".doc" then%>
<%Else Right(RS("navn"), 4) = ".doc"%>
<INPUT TYPE=IMAGE src="../include/images/OpenWord_up.gif" NAME=Btn1 alt="Åbn i Microsoft Word" border="0" style="height: 34px; Width: 191 px"><br>
<%End If%>
Precis som den läser fel eller något?
Så där kan du inte skriva. Vad får du ut med en response.write av right()... ?
Nä men detta borde ju funka:
<%If Right(RS("navn"),3) = "doc" then%>
Word dokument
<%Else%>
Inte ett Word dokument
<%End If%>
Men det gör det inte!
Så här kan de posterna i navn se ut:
930000008UK.doc
930830041UK Outlet dif cone.pdf
osv..
Ja... och om du skriver ut Right(RS("navn"),3) med response.write ???
så här:
<%If Right(RS("navn"),3) > "doc" then
response.write "Dette er ett Word dokument"
Else
response.write "Dette er IKKE ett Word dokument"
End If%>
?
Funkar inte den visar fortfarande "Dette er IKKE ett Word dokument" fast det är en word fil
amen vafaaaannn, förlåt att jag svär men det hjäper ju inget att jag skriver den sattsen när vartenda jävla post i databasen innehåller 2 mellanrum till att sluta med... och det är 4500 poster, Gaaah ska jag behöva ta bort dem för hand =) HAHA men tack för hjälpen Anders!!!!
går nämligen inte att ta ersätt på mellanrum vad jag vet..
Eller jo det gick, skulle bara ställa sökningen på att matcha delar av posten och inte hela.. Måste ha blivit något tjafs när jag importerat från textfil till Access. Hehe =) Tack så mycket för fel sökningen @nders nu funkar det!
Jag kände nästan på mig att det skulle ligga och släpa lite mellanslag i fältet. ;)
@nders skrev:
Nej, jag tar och provar att skriva det en fjärde gång
hihihi.... :e
Ja, det blev ju en aningen tjatigt.
Den lätta vägen: Gör som mentor-m@rsvin säger med detsamma.
Den lärdomsrika vägen: Vägra lyssna på WF:s mentorer. ;)
Hehe förstog ju aldrig vad han menade förren fjärdegången, trodde ju han hakat upp sig :birp
