Just nu i M3-nätverket
Gå till innehåll

Ringbom

Medlem
  • Antal inlägg

    77
  • Gick med

  • Senaste besök

Om Ringbom

  • Medlemstitel
    Användare

Kontaktinformation

  • Hemsida
    http://www.historiesajten.se/

Profil

  • Ort
    Visby

Senaste profilbesöken

Blocket med senaste besökare är inaktiverat och visas inte för andra besökare.

  1. Nej jag gillar samtidigt att koda och bygga design och sånt. Fast det bästa är ju förstås att skriva och lägga in artiklar. Kollade på wordpress för ett antal år sedan men det verkade bara krånglig, jag vill ha koll på koden. Håller på och ändrar nu så det ska bli säkert, fått hjälp av mina duktiga jobbarkompisar
  2. Jag har en web.config som ser ut så här, och när jag ändrade till <httpErrors errorMode="DetailedLocalOnly" /> så försvann sajten från nätet tills jag ändrade tillbaka igen :/ <configuration> <system.web> <customErrors mode="Off" /> </system.web> <system.webServer> <rewrite> <rules> <clear /> <rule name="Redirect to https" stopProcessing="true"> <match url=".*" /> <conditions> <add input="{HTTPS}" pattern="off" ignoreCase="true" /> </conditions> <action type="Redirect" url="https://{HTTP_HOST}{REQUEST_URI}" redirectType="Permanent" appendQueryString="false" /> </rule> </rules> </rewrite> <httpErrors errorMode="Detailed" /> </system.webServer> </configuration> så det gick inte bra
  3. Jättetack för alla tips 😊 ska testa när jag kommer hem från jobbet. Har fått lite input från jobbarkompisar också så förhoppningsvis kommer jag fixa det här.
  4. Jo jag vet att det är gammal kodspråk men jag har byggt upp den här sidan under 15 år och det känns övermäktigt att koda om alla sidor jag har, helst när jag vet att det är 1000-tals besökare om dagen på sajten. Jäkligt poppis i skolorna. https://www.historiesajten.se/artaldod.asp?siffra=14 Om man sätter en fnutt 'efter 14 i den här länken får man meddelanden på engelska. Bara där avslöjar den ju databas och allt. Kan man på något sätt dölja det? Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [MySQL][ODBC 3.51 Driver][mysqld-5.7.25-log]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '%' order by historia.dod, historia.enamn asc' at line 1 Sitter på jobbet nu och kommer inte åt min databas eller filer just nu
  5. Jag undrar om någon känner någon som jag kan anlita för att få hjälp? Jag måste fixa detta så inte min sajt stängs ner igen. Räcker eg. med att någon hjälper mig med en fil så kopplar jag nog sedan hur jag ska göra/tänka.
  6. nej det hjälpte inte "Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt."
  7. Ändrade lite och fick nu "Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt." Dim bokstav bokstav = Left(Request.QueryString("bokstav"), 1) Set Connect = server.createobject("ADODB.connection") Connect.Open Session("Connection_String") Set cmd = server.createobject("ADODB.Command") cmd.CommandText = "SELECT * FROM tabellen WHERE tabellen.fnamn LIKE @bokstav order by tabellen.fnamn, tabellen.enamn asc" cmd.CommandType = adCmdText cmd.CommandTimeout = 900 set param = cmd1.CreateParameter("@bokstav", 200, 1, 200, bokstav & "%") cmd.Parameters.Append param ' Execute the query for readonly RecSet.CursorLocation = adUseClient RecSet.Open cmd, , adOpenForwardOnly, adLockReadOnly
  8. Nu fick jag Körningsfel i Microsoft VBScript error '800a01a8' Objekt krävs.: '' /nina/historia/fornamn.asp, line 104 <% '************* Databaskoppling *********** Dim bokstav bokstav = Left(Request.QueryString("bokstav"), 1) set param = cmd1.CreateParameter("@bokstav", 200, 1, 200, bokstav & "%") Set Connect = server.createobject("ADODB.connection") Connect.Open Session("Connection_String") Set cmd = server.createobject("ADODB.Command") cmd.ActiveConnection = Conn cmd.CommandText = "SELECT * FROM tabellen WHERE tabellen.fnamn LIKE @bokstav order by tabellen.fnamn, tabellen.enamn asc" cmd.CommandType = adCmdText cmd.CommandTimeout = 900 cmd.Parameters.Append param ' Execute the query for readonly RecSet.CursorLocation = adUseClient RecSet.Open cmd, , adOpenForwardOnly, adLockReadOnly
  9. Tack för att du försöker hjälpa mig! jag har suttit en stund nu och försökt få in det du skrev men det blir fel hela tiden. Den klagar bl.a. på Kompileringsfel i Microsoft VBScript error '800a0408' Ogiltigt tecken Set RecSet = server.createobject(ADODB.Recordset)?
  10. hinner ingen före tar jag tacksamt emot hjälp imorgon. jag har en gigantisk stor hemsida med just nu 17 asp-sidor som behöver ändras kod i. Men om du hjälper mig med en sida så kan jag säkert klura ut hur de andra ska se ut. T.ex. på en sida ska jag plocka ut alla personer som är födda på 1400-talet och sedan sortera på dödsår, namn, yrke, dödsålder. https://www.historiesajten.se/artaldod.asp?siffra=14
  11. Jag har googlat och läst hela natten, inte sovit någonting. Det är därför jag skriver här för att få kod-tips. Jag kan betala en slant för den som hjälper mig. Hade en annan attack för några år sedan och försökte få hjälp då med, men hittade ingen som kunde tyvärr. Jag är ingen utvecklare utan gillar bara att skriva om historia
  12. Hej jag tänkte bara fråga om någon skulle vilja hjälpa mig med min sida som blev hackad inatt. Den är visserligen uppe nu men fick stränga order om att "täppa till hålen" vilket är lättare sagt än gjort när man inte är någon utvecklare. Jag kör med klassisk asp och har en mysql-databas. Mina besökare kan inte skriva in något, har tom tagit bort gästboken och searchfunktionen. Så nu kan de endast läsa. Ända blev den hackad. Hur skulle ni ha ändrat det här koden för att den ska bli säker? Hoppas på possitivt svar. Dim bokstav bokstav = Request.QueryString("bokstav") Set Connect = server.createobject("ADODB.connection") Connect.Open Session("Connection_String") Set RecSet = Connect.Execute("SELECT * FROM tabellnamn WHERE tabellnamn.fnamn LIKE '" & Request.QueryString("bokstav") & "%' order by tabellnamn.fnamn, tabellnamn.enamn asc")
  13. Efter ett längre uppehåll är jag tillbaka... har inte fått till det här ännu eftersom jag plockar upp från en databas... den koden som jag har på den gamla sajten ser ut så här (http://slottsguiden.info/slott.asp) Jag kan få till det i en sån lista, men grejen är den att när man förminskar fönstret försvinner bilderna i den högra kolumnen... Den koden som jag försöker ändra är en som jag fick hjälp av här för flera år sedan (tror det var den här sajten) Den ser ut så här <% With Response lngX = 0 Do While Not RecSet.EOF If lngX Mod 3=0 Then .Write "<tr valign=""top"">" & vbCrLf .Write "<td style=""width:125px;height:155px;text-align:center;"">" .Write "<a href=""m_slottdetalj.asp?id=" & RecSet("id") & """><img style=""width:100%;height:80%;"" class=""galleri"" src=""./slott/" & RecSet("foto2") & ".jpg"" alt=""" & RecSet("slottsnamn") & """/></a><br />" .Write "<a href=""m_slottdetalj.asp?id=" & RecSet("id") & """>" & RecSet("slottsnamn") & "<br>" & RecSet("karta") & "</a>" .Write "<pre></pre>" .Write "</td>" & vbCrLf If lngX Mod 3=3 Then .Write "</tr>" & vbCrLf lngX = lngX + 1 RecSet.MoveNext Loop .Write "</table>" & vbCrLf End With %> <% '********** DB-close *************** RecSet.Close Set RecSet = Nothing Connect.Close Set Connect = Nothing '*********************************** %> Jag sitter verkligen fast jag har försökt att ta bort table och tr, td, men ändå collapsar inte bilderna i mobilen så att de ligger under sig, utan två ligger i bredd och tredje försvinner helt, går inte ens att skrolla utåt höger för att se den, den bara försvinner... så om man ser på http://slottsguiden.info/slottlandskap.asp?landskap=2 så försvinner slottet skottorp. I listan finns det när fönstret är stort fem slott, men i mobilen bara 4.
  14. Tack för hjälpen. Det är just det jag håller på med, att anpassa till responsive design, började med mobilen först. Men har så många länkar i min databas som måste gå till både m_sajten och vanliga sajten i ett första skede. Har 100-tals sidor som ska göras om så det tar ju sin tid. Under tiden vill jag ju att de sidorna jag lägger på efterhand på mobilen ska fungera Snackade med en utvecklare på jobbet idag och han sa att jag skulle skriva nått liknande <!-- if (screen.width <= 800) { url ='m_'slottdetalj.asp? querystring redirect eller något liknande, fick det bara nedskrivet lite snabbt på en postit-lapp så det var lite svårt att se när jag kom hem :/
  15. Har totalt fått hjärnsläpp... jag har gjort en mobilversion av min hemsida och har lagt in följande kod på webbsidan som sänder vidare till mobilsidan om jag söker via mobilen. Den funkar klockrent.. <!-- if (screen.width <= 800) { window.location = "http://slottsguiden.info/m_slotteuropa.asp"; } //--> Men nu är grejen den att i texten på mobilsidan har jag länkar som länkar till andra slott, och klickar man på en sån kommer man till startsidan i mobilsidan. Jag vill ju komma till det specifika slottet jag länkat till. Söker man på google på t.ex. skokloster, och min länk där heter slottsguiden.info/slottsdetalj.asp?id=8 så kommer jag till slottsguidens startsida i mobilen.. hur ska man göra så att den känner av och kommer rätt? Känns som jag via koden ovanför här måste lägga till någon typ av if-sats, och nån request.querystring men har försökt med allt men får det inte att fungera. Någon som har något tips?
×
×
  • Skapa nytt...