Hi NeoPa,
My apologies for any forum etiquette i failed to follow, will make sure i go through some of the guides and the posts are more efficient to both myself and other users in future posts.
User Profile
Collapse
-
I Have chosen my own comment as best answer, but ALL credit goes to Slaxer13.Leave a comment:
-
Ok, so found a solution to this, thank you to Slaxer13 who had the patience of a saint with me, back and forth over 150 emails.
Here is the final code for anyone else it may help .
Code:Option Compare Database Private Sub cmdAll_Click() Dim LSQL As String 'Display all vehicles LSQL = "select * from Vehicles" Form_Vehicles.RecordSource = LSQL
Leave a comment:
-
Hi PNaaber,
Well my example wouldn't refresh your page, but just allows for users to click through the images and you can predetermine that nothing will repeat, you can get Jquery to make that auto scroll also, as for your page refresh for adverts, im not sure how that works, but could you not have the adverts on a autoscroll with mapping on them including the href ? or would that not work ?Leave a comment:
-
Perhaps change it to something that you can define the image in html, so you can manually check nothing repeats, there are hundreds of gallery scripts out there that allow this, but for example.
Code:<div id="gallery"> <a href="www.yourwebsite.com"><img src="imageurl" alt="#"/></a> <img src="imageurl1" alt="#"/>
Leave a comment:
-
So do you mean that you are looking for it to create a playlist of sorts that plays one after another ?Leave a comment:
-
Hi NeoPa,
So i tried this and got 2 problems with it, in the vb editor the lineCode:Call .Recordset.FindFirst("([Vehicle Model]='" & Text17 & "')"
Code:Private Sub Command19_Click()
Leave a comment:
-
Ok so its working .....kinda, but it doesn't find anything, so here is the code now -
Code:Option Compare Database Option Explicit Private Sub Command19_Click() If IsNull(Text17) = False Then Me.Recordset.FindFirst "Vehicle Model" = " & Text17" Me!Text17 = Null If Me.Recordset.NoMatch Then MsgBox "No record found", vbOKOnly + vbInformation,
Leave a comment:
-
Hello everyone, so with the help of Slaxer13 i have been plodding away, but still with no success, so this is the code im using now, kindly linked by Slaxer -
Code:Private Sub Command19_Click() If IsNull(Text17) = False Then Me.Recordset.FindFirst "[Vehicles]=" & Text17 Me!Text17 = Null If Me.Recordset.NoMatch Then MsgBox "No record found", vbOKOnly + vbInformation,
Leave a comment:
-
-
Its ok Slaxer, this is my 5th day with Access so i have no idea by comparison, so the table that link you posted shows in design view as a form, im trying to find a means of putting my current table there and change the search options to match that, i have found the search names in the code, so i can change those to match those in the table, but where to add the table instead of the one that is there is baffling me, this is kinda fun though....in...Leave a comment:
-
-
Good Morning all,
So i have been looking into the code Slaxer13 sent me, and the following line of code.
Code:Private Sub btnSearch_Click() ' Update the record source Me.frmsubClients.Form.RecordSource = "SELECT * FROM qryClientData " & BuildFilter ' Requery the subform Me.frmsubClients.Requery End Sub
Would the lineCode:Me.frmsubClients.Form.RecordSource
Leave a comment:
-
-
Hi Mia,
Nomad is right, it seems odd to see the root directory, it defiantly sounds like a path issue, try and put the css in the same directory as the index and upload, does it work then ? im happy to look at the files if you want to share them, and ill have a quick look into it for you.
Generally speaking though, like nomad i would be going for something like thisCode:<link rel="stylesheet" type="text/css"
Leave a comment:
-
Twinny,
I like these lessons ! again thanks for the effort and the patience, greatly appreciated !
So it turns out it was something simple, there was a security option to enable the content in the db, once i clicked enable, it then run the code and i go the "It Works" Message.
Is there any steps i should be taking now to further look into my search function, Btw Slaxer13, i looked into that link you...Leave a comment:
-
-
Hi Twinny, thanks again for that post, so i did as you said and my code looks like thisCode:Option Compare Database Option Explicit Private Sub Command17_Click() MsgBox "It Works!" End Sub
Leave a comment:
-
Hi Slaxer,
Shall take a look once i have worked through twinny's post, thanks very much mate :)Leave a comment:
-
Before i continue my way though this, thank you for the effort you are putting in here, it is greatly appreciated, and im not looking for someone to make it for me, im a web developer, and know the frustrations of coding for someone, if i wanted that kind of service, i would pay a dev ;) , that said i want to learn vb and work my way through this, these guides written like this help me a lot and i extend my gratitude to you, shall continue working...Leave a comment:
No activity results to display
Show More
Leave a comment: